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A brand-new world of 
machine language 
programming is there for | 
the exploring inside the . er sk : : 
Commodore 128. Get An Introduction 
started with this thorough To Assemblers For The Slots 
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need a good assembler— _ four-level strategy game 
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When the Going Gets Tough, 
the Bard Coe Drinking. 
























are magic, the Bard is ready 
to boogie. All he needs is 
a band of loyal followers: 
a light-fingered rogue to 
find secret doors, a 
couple of fighters 
to bash heads, a con- 
jurer to create weird 
allies, a magician for 
magic armor. 
Then it's off to com- 
s soon as the Bard 
Ss one More verse 
Now what's a word that 
rhymes with “dead ogre?” 





A the going is tough 
in Skara Brae town 
The evil wizard Mangar 
has cast an eternal winter 
spell. Monsters control 
the streets and dun- 
geons beneath. Good 
citizens fear for their 
lives. What's worse, 
there's only one tavern 
left that serves wine. 
But the Bard knows 
no fear. With his trusty 
harp and a few rowdy 
minstrel songs he claims 
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es of magic user, including 128 color monsters, many Full-color scrolling dungeons. 
wizard and sorceror. 85 new animated. All challenging. 16 levels, each better than the 
magic spells in all, one before. 3-D city, too. 
The Bard's Tale” 
from 
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¢. 400K worth on 2 disks. 64K RAM minimum; enha 
call (800) 245-4525 (In Calif, call (800) 562-1112) for VI 


lay, CA 94109. Add $3 









for 128K. Now available for Apple Il family for $44.95, C-64 & 128 fc 
or MasterCard orders. To purch heck or money order to Ele: 
sured shipping and handling, Allow 1-4 weeks for delivery. The Bard’ Tale is worth the wait 

ered trademark of Sit-lech Software, Ine, Ultima is a registered trademark of Richard Garriott, The Bard's Tale ancl 
py of our complete catalogue and direct order form, 





your retailer 
Arts, PO. Box 306, Half Moon 
Apple is a trademark of Apple Computer Wizardry is 
Blectronie Arts are trademarks of Electronic Arts, For a 
Arts, 2759 Campus Drive A 94403, 
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The Infinity Mac! 
holds the secr 
of eternal li 





artridge now lets you effortlessly 
sible games without being killed! 


er sarin ing davice|called //Sprite'callision 
1, are disabled by the Infinity 


and the Infinity Shield protects the player 
being shot or crashing! 
Bt can | now do in a game that | couldn't before? 
Hivating the cartridge enables you to: “Enter a game at any level you _ 

thoose”. “Explore all the areas and levels of the game and find the parts of 
the game you didn’t know existed without being killed.” Deactivating the 
cartridge at any point you choose enables you to continue to play the game 
totally normally, 


ity Machine is brought to you at $24.99 by Mastertronic, producers 
of incredible value Commodore 64/128 software such as Slugger, 5-a-side 
Soccer and The Last V8 all available at $9.99. 






Discover the thrill of 






with COMPUTE! Books’ 
40 Great Flight Simulator Adventures 


Maneuver around the towers of the World Trade Center. 
*Sightsee the Hudson River. 
*Practice night flying and aerobatics. 





40 Great Flight Simulator Adventures 

Charles Gulick 

Forty exciting, customized flight simulator scenarios put you in the 
pilot's seat as you fly over bridges, around skyscrapers, and land 
at mysterious airports. Flight Simulator (IBM PC) and Flight Simu- 
lator Il (Apple !1, Commodore 64, Atari) are two of the most popu- 
lar games/simulations for personal computers. With this book, you 
can experience flight adventures from the moment you load the 
program. Parameters set up each flight and a running commentary 
describes what you'll see (and where to look to see it). Ranging 
from the simple and straightforward to the advanced and even 
mystical, these 40 flights will open a new dimension to an already 
outstanding program. 

$9.95 ISBN 0-87455-022-X 
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designed to enhance the programs. 
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| Please send me ________ copies of 40 Great Flight Simulator Adventures at $9.95 each. | 

| (ISBN No, 0-87455-022-X) | 

| All orders must be prepaid in U.S. funds. | 
ibt 

| Serge) To order this exciting adventure guide, mail | 

NC residents add 4.5% tax = ———___ the attached coupon with your payment to 

| $2.00 shipping and handling COMPUTE! Books, P.O. Box 5038, | 
charge per book. a F.D.R. Station, New York, Ny 10150. Or call 

| Total amount enclosed pe toll free 1-800-346-6767 (in NY 212-887-8525.) | 

| 1 Payment enclosed (check or money order) | 

| Charge Visa O MasterCard ( American Express | 

Name 

| Address | 

| City State Zip | 

| Please allow 4-6 weeks for delivery. | 


COMPUTE! books are available in the U,K., Europe, the Middle 


COMPUTE! E! Publications, Ine.g East, and Africa from Holt Saunders, Ltd., 1 St. Anne's Road, 


‘One of the: Eastbourne, East Sussex BN21 3UN, England. 


~ Fly Faster and Farther _ 


with COMPUTE!’s 
40 More Great Flight Simulator Adventures 





it Nh i mh i i im This follow-up to the popular 40 Great Flight Simulator 
tN 
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Adventures brings you 40 more exciting, suspenseful 
flight simulator scenarios to help you get the most 
enjoyment from your Flight Simulator or Flight Simu- 
Jator II software. 


40 More Great Flight Simulator Adventures 
Charles Gulick 
Microsoft's Flight Simulator (IBM PC) and Sublogic's Flight Simulator II (Ap- 
ple Il, Commodore 64, Atari) are two of the most popular software pack- 
ages today, They put you in the pilot's seat, letting you experience the 
thrill of flight. Now, 40 More Great Flight Simulator Adventures, the sec- 
ond such guide, brings you more dazzling flights drawn from both fact and 
fancy. 

_Now you can fly where no one has flown before, with the author as 
your flight instructor. He helps you explore the unknown regions of flight 
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Note: The Flight Simulator program itself is not included and must be pur- 
chased separately. 





To order any COMPUTE! book, call toll free 800-346-6767 (in NY 212-887-8525). 
Or mail in the attached coupon with your payment, Include $2.00 shipping and 
handling per book. 
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Nobody's quite sure what program- 
ming talent is, where it comes from, 
or whether or not there are correla- 
tive talents. It is popularly assumed 
that facility in math ties in with ap- 
titude for computer programming. 
Some colleges even make math 
courses prerequisites to a major in 
computer science, 

However, an extensive survey 
of the best programmers at a major 
American corporation revealed that 
there is no direct link between 
mathematical facility and the abili- 
ty to effectively communicate with 
computers. Instead, the survey un- 
covered a strong correlation with 
musical ability and with those who 
had majored in English. 

It’s easy enough to guess why 
English majors would do well— 
they've spent years developing 
their ability to communicate effec- 
tively, and programming is essen- 
tially a special kind of commu- 
nication: man to machine. 

What musical aptitude has to 
do with it is somewhat less easily 
imagined. Some have suggested 
that music combines the freedom of 
expression of art with formal rules 
and that, like programming, it calls 
upon a person's imagination while 
simultaneously requiring a focused 
attention to the rules of the game. 

Recent studies of elementary 
and junior high school students 
who show an aptitude for computer 
programming have revealed an in- 
teresting relationship: the best pro- 
grammers also scored highest on 
personality tests in the areas of 
adaptability and flexibility and 
scored lowest on tests of rigidity. 
This parallels somewhat the musical 
abilities association and suggests 
that these personality types flourish 
in the atmosphere of restrained free- 
dom characteristic of both musical 
and programming activities. Nota- 
bly, students scoring at the extreme 
ranges of the masculinity /femininity 
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scales correlated poorly with pro- 
gramming skill. In fact, any rigidi- 
ties of behavior seemed to retard 
programming abilities. 

Of course, much more study 
needs to be done before any truly 
predictive tests can be developed. 
These early studies reveal tentative 
correlations, but it’s too soon to 
know whether these results will en- 
dure, will eventually prove to be 
substantial indicators of this new 
talent. 

And there are clearly many 
kinds of programming. Designing 
the most efficient sorting algorithm 
in machine language requires con- 
siderable experience and not a little 
patience. Working with a team to 
put together an airline reservation 
application program demands tol- 
erance of the considerable delay be- 
tween actions and results as well as 
the capacity for intensive communal 
labor. Writing an arcade game calls 
upon special imaginative gifts anda 
sensitivity to playability, that balance 
between simplicity and challenge. 

Programs are created when the 
programmer communicates rules 
for the computer to follow, man to 
machine. But there’s another more 
important act of communication— 
the interaction between the com- 
puter and the program’s user. This 
is communication machine to man. 
No matter how full of features, how 
speedy or well-constructed it is, a 
word processor which doesn’t com- 
municate effectively with the user 
will never become popular. Per- 
haps it’s in this area of program- 
ming, often called the user interface, 
where the abilities of English ma- 
jors are particularly valuable. 

Ultimately, it would be quite 
valuable to be able to know in ad- 
vance who is and who isn’t likely to 
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do well talking to machines. Chil- 
dren could be guided into or away 
from this field; corporations would 
be able to refine their hiring meth- 
ods; and otherwise potentially ex- 
cellent programmers wouldn't be 
excluded from computer science 
courses simply because they 
weren't adept at calculus. However, 
it’s equally possible that there is no 
reliable predictor and the only 
proof of programming ability is the 
writing of a good program. 

Here at COMPUTE! we've pub- 
lished excellent programs created 
by every age group, from every 
geographical area, programs writ- 
ten by college professors and high 
school students—in short, polished 
programs written by a complete 
spectrum of educational and occu- 
pational backgrounds. No real pat- 
terns have emerged except that the 
majority of submissions are from 
males. But computers are a quite 
new phenomenon and they are rap- 
idly penetrating the population at 
large. We'll keep a lookout. If any 
trends develop, we'll let you know, 


Hovt2 ougfear 


Richard Mansfield 
Senior Editor 
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Earth will be destroyed in 12 minutes 
to make way for a hyperspace bypass. 


Should you hitchhike into the next galaxy? 
Or stay and drink beer? 


Slip the disk in your computer and suddenly you are Y. 
Arthur Dent, the dubious hero of THE HITCHHIKER’S 
GUIDE TO THE GALAXY, aside-splitting masterwork 


wy, 
of interactive fiction by novelist Douglas Adams and cae a ee 
Infocom’s Steve Meretzky. And every decision you _ — 


make will shape the story's outcome. Suppose for i. ) 












instance you decide to linger in the pub. You simply 
type, in plain English: 

DRINK THE BEER 

And the story responds: 

YOU GET DRUNK AND HAVE A TER- 
RIFIC TIME FOR TWELVE MINUTES» 
ARE THE LIFE AND SOUL OF 
THE PUB+ THEY ALL 
CLAP YOU ON 
THE BACK 


And the story responds: 
THE RAVENOUS BUGBLATTER BEAST OF 
TRAAL 1S COMPLETELY BEWILDERED, 

AND IT 1S SODIM IT THINKS IF YOU CAN‘T 
TELL YOU SEE IT) IT CAN’T SEE YOU, 

WHAT A GREAT Simply staying alive from one zany situa- 
CHAP YOUNARE AND tion to the next will require every proton of 
THEN ICS EAR UHICE TS ) puzzle solving prowess your mere mortal 
UNEXPECTEDLY DEMOLISHED, YOU t : 

WAKE UP WITH A HANGOVER WHICH LASTS mind can muster. So put down 
FOR ALL ETERNITY, YOU HAVE DIED, wate that beer and hitchhike 
Suppose, on the other hand, you decide to: down to your local 
>EXIT THE VILLAGE PUB THEN GO NORTH software store today. 

In that case you'll be off on the most mind-bogglingly ago ~~ Before they put that 
hilarious adventure any earthling ever had. bypass in. 
You communicate—and the story responds-in full 
sentences. So at every turn, you have literally thousands 
f alternatives. If you decide it might be wise, f 
ance, to wrap a towel around your he: 
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InFocom 


ees For more information call 1-800-262-6868. Or write to us 
Her interac Fes e at 125 CambridgePark Drive, Cambridge, MA 02140. 
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Do you have a question or a problem? 
Have you discovered something that 
could help other Commodore users? 
We want to hear from you. Write to 
Gazette Feedback, COMPUTE!’s GA- 
ZETTE, P.O. Box 5406, Greensboro, 
NC 27403. We regret that due to the 
volume of mail received, we cannot 
respond individually to programming 
questions. 


Switching Cases 

I was recently fooling around with 

CHR$ and discovered that PRINT CHR$ 

(14) puts the letters into upper/lower- 

case mode. Is there a CHR$ that changes 

them back to uppercase/graphics? 
Matthew Whitaker 


Try PRINT CHR$(142) for uppercase/ 
graphics, You can find a complete list of 
these CHR$ codes (also called ASCII 
codes) in an appendix at the end of your 
user's guide. 





The Grammar Of Disk Commands 
How do I rename or scratch a program? 
When | try the examples in the disk 
drive manual, they don’t work. The 
commands I’m using are 
PRINT#15, “RENAMED: newname=old 
name” 8 
PRINT#15, “SCRATCHO: programname” 
8 
Julie Anne Mood 


Computers are quite literal and are sensi- 
tive to spelling and syntax, You've made 
at least one error—the ,8 should not be in 
the command. Also, before you PRINT# to 
channel 15, it must be opened. Type 
OPEN 15,8,15 to prepare channel 15; 
when you're done sending disk com- 
mands, CLOSE 15 turns it off. 

All disk commands can be abbreviat- 
ed to a single letter; “R" instead of “RE- 
NAME" and “'S” instead of “SCRATCH”. 
This saves you a little typing. Also, the 
character after the command is the num- 
ber zero (0), not the letter O. So, to scratch 
a file called PINETREE, enter the three 
lines below: 

OPEN 15,8,15 
PRINT#15, “SO:PINETREE” 
CLOSEI5 


To rename a file currently called 
OAK to the new name CEDAR, enter these 
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three lines: 

OPEN 15,8,15 

PRINT#15, “RO:CEDAR=0:OAK” 
CLOSE15 


Readers who own a 128 can use the 
built-in SCRATCH and RENAME com- 
mands instead of going through the disk 
command channel. 


Orderly Characters 
I'm taking a computer class in high 
school, My teacher showed us a pro- 
gram that waits for you to press a key 
and then prints the character and its 
ASCII code. I translated it to Commo- 
dore BASIC (listing enclosed). Most of 
the keys work, but some don’t. Can you 
explain what's wrong? 

Mark Riddle 


One of the lines in your program is IF 
A$>="0" THEN 50. Line 50 then 
prints the character and its ASCII code. If 
the character in A$ is less than “O", the 
program loops back to check for another 
key to be pressed. 

Look for an appendix that lists ASCII 
and CHRS codes in the back of your user's 
guide, the book that came with the com- 
puter. These are Commodore ASCII codes, 
not true ASCII, so they may differ slightly 
from the ASCII you've studied in school. 
Some of the numbers are different, but the 
idea is the same. 

When your computer executes the IF 
statement, what it’s really doing is check- 
ing the ASCII value of the string variable 
A$ against the ASCII value of the string 
literal “0”, (A string literal is a series of 
zero or more characters inside quotation 
marks.) The character “O" has an ASCII 
value of 48, as you'll see if you examine 
the appendix in the user's guide. Or type 
PRINT ASC(‘0") to see what your com- 
puter says. You could also try PRINT 
CHRS(48), to verify that character num- 
ber 48 is a zero. 

Your program is almost correct, but it 
prints only characters higher than “0” on 
the list of ASCII codes. It ignores charac- 
ters such as !, #, or / (with corresponding 
ASCII codes of 33, 35, 47) because they're 
less than CHRS(48), the string literal “0”. 
To fix it, change the IF statement to IF 
AS$>= CHRS(0), or if you want to bypass 
the control codes (color changes and the 
like), IF AS>= CHRS(32). 








Editors and Readers 


Making Backups 
I always use the Wedge program that 
comes on the 1541 Demo disk. I have 
tried repeatedly to copy the two sepa- 
rate programs from the Demo disk. I 
can save the BASIC program called “‘C- 
64 WEDGE”, but no matter what I try, I 
am unable to save the “DOS 5.1” pro- 
gram, the machine language portion of 
the Wedge. Can you set me right? 
James C. Platt 


BASIC programs like “‘C-64 WEDGE” are 
easy to load and save using the commands 
BASIC offers. BASIC also has a provision 
for loading machine language (ML) pro- 
grams. Just add the number 1 after the 8 
(for example, LOAD “DOS 5.1”,8,1). Un- 
fortunately, there is no command to save 
an ML file on the 64. Many other comput- 
ers, including the Commodore 128, have a 
command to do this (BSAVE), 

One solution is to use the “MLX” 
machine language editor. This only works, 
however, if you know the starting and 
ending addresses of the program you're 
trying to save. To back up DOS 5.1, you'd 
load and run MLX and give it a starting 
address of CC00, ending address CFFF. 
Load DOS 5.1 from MLX, switch disks, 
and save to the new disk (see the MLX in- 
struction page for more details). If you 
don’t know the starting and ending ad- 
dresses of the program, you can’t use MLX 
to make a backup. 

The following short program simpli- 
fies the copying of Commodore 64 pro- 
gram files. It works with both ML and 
BASIC programs. Before you run it, put a 
disk into the drive. When the program is 
run, it writes a program called COPYIT 
on the disk, 

JF 10 OPEN2,8,1,"COPYIT":PRINT 
#2,CHR$(@);CHR$(192); 
C=@ :FORA=1T0139 :READB:C= 
C+B:PRINT#2,CHR$(B);:NEX 
T:CLOSE 2 
IFC<>20455THENPRINT" 
{CLR} {2 DOWNJDATA ERROR" 
STOP 

PRINT" (CLR) {2 DOWN ]DONE" 
DATA 32,169,192,32,253,1 
74,32,158,173,32,130,183 
166 ,34,164,35,32,189,25 


IG 20 
CK 30 


cs 40 
EK 50 


5 

DATA 169,2,162,8,168,0,3 
2,186,255,32,192,255,162 
+2,32,198,255,32,228 
DATA 255,160,0,145,251,1 
65,144, 208,6,32,125,192, 
76 ,36,192,165,251,133,25 
3 


DP 60 


QM 70 





BRADY adds 
more power to 
our Commodore. 


Nobody understands how to get the most out of Commodore computers— 
without having to add more machine—better than Brady Books. And now you 
can too. Call toll-free or use the coupon below to order today. 


1. Teaches you about using the DOS, disk 














2 Clarifies contusing areas and corrects 3. Arevision of the bestselling classic (old 
formatting and organization, direct-sccess omissions in the equipment’s user's man- ‘shown above) this real learn-by- 
Fecovering, ual. Youlllearn howto validate initialize, doing tutorial includes discussions of chip 
Fama euse disks, and more. Aiso includes a mail ‘along with commands and ime 
Ing list application listing for demonstration portant concepts such as output, address 
r aswell as some ofthe best uility programs. modes, memory maps, and linking BASIC to 
‘ssembled and annotated 00S. $19.95 $1995, 


ine lar ¥ t He 1028 
Owners. $1455 (isk avaliable) 


ASSEMBLY LANGUAGE 
PROGRAMMING with the 
_ Commodore 64 


LO ora 


4, Perfect 
assembler. SI 


nner's introduction to 





execute prog ner 
familiarize you with the instruction set of 
the 6510 processor. $14.95 (Disk and kit 
available 





Now at your book or computer store. 
Or order toll-free today: 


c/o Prentice Hall, 
P.O. Box 512, W. Nyack, NY 10994 


| Circle the numbers of the titles you want below. 
(Payment must be enclosed; or, use your charge 
| card.) Add $1.50 for postage and handling 
Enclosed is check for $_—_ or charge to 
| GMasterCard [1 VISA. 


2 (0-89303-738-9) 





SYMONS 


BASIC 


5. With a David Simon 
himsett, here's the frst and fast word on 
Bi to 144 


Simons 
prectlel pe for thie enguage. For both the 

a tanguege Fort 
Bend tan br2 05 





In New Jersey: 


800-624-0023 800-624-0024 


Acct # Exp. date 


Signature ~ 








Name 
Address 
City Stat 

(New Jersey residents, please add applicable sales tax) 
Dept. 3 


3 (0-89303-652-8) 











| 

| 

Zip I 
GR-COGA-BX(8) I 

4 (0-89303-319-7) 5 (0-89903-419-3) 


Ce TTT ili] 


HG 88 DATA 165,252,133,254,32, 
109,192,32,228,255,201,6 
7,208,249,169,2,162,8,16 


0 

DATA 1,32,186,255,32,192 
255,162,2,32,201,255,32 
1132,192,32,125,192,165, 


AR 90 


251 
XF 108 DATA 197,253,208,244,16 
5,252,197,254,208,238,3 
2,132,192,169,52,133,25 
1,169 
DATA 8,133,252,169,2,32 
1195,255,76,204,255,230 
1251, 208,2,238,252,96,1 
60 


GB 118 


KR 120 DEER 6,177,251,76,210,2 

To copy a program, LOAD “COPY 
IT” 8,1, then type NEW. Insert the disk 
containing the program to be copied into the 
drive. Type SYS 49152,filename”, sub- 
stituting the name of the file you want to 
copy for “filename”. 

When the red disk drive light goes off, 
remove the disk and put the disk onto which 
you want to copy the program into the 
drive. Press the C key (remember that C 
means Copy). When the READY prompt ap- 
pears, your copy is done. 





Commodore POKEs 
Could you print a list of POKEs for the 
64 like the ones you published for the 
128 in the March issue? These were the 
POKEs for disabling RUN/STOP-RE- 
STORE and the like. 

Stuart Hopcraft 


We've assembled the following useful 
POKEs from previously published lists. 





If you disable the keyboard in direct 
mode, you won't be able to enter the POKEs 
to get it back because, of course, the key- 
board is inoperative. RUN/STOP-RE- 
STORE still works, unless you've disabled 
it, too, and will allow you to regain a func- 
tional keyboard. Also, strange things hap- 
pen when you POKE22,35 to stop the 
printing of line numbers. For one thing, 
printing a string inside quotation marks 
(PRINT “ABC”) won't work, although 
string variables can still be printed. 

The POKE to remove line numbers 
gives you a simple sort of word processor. 
You can type a message with line numbers 
as if it were a BASIC program, enter the 
POKE, and then LIST to the printer. Your 
message will print out with no numbers. 





Reprogramming The Function Keys 
Is there a way to disable the Plus/4’s 
function keys (which are preset), so 
they could be used for various functions 
in other programs? 

Frank E. Armstrong 


The 128, Plus/4, and 16 all have a KEY 
command which does two things. Type KEY 
all by itself and you'll see the current list of 
function key definitions. It also allows you 
to redefine the strings printed by the func- 
tion keys, Entering KEY 1, “OPEN 4,4: 
CMD4: LIST” + CHR$ (13) would 
change f1 to print the commands for listing 
a program to the printer plus a carriage re- 
turn, the CHR$(13). Add a number 1-8 after 
KEY, followed by a comma and the charac- 





ters or CHR$ codes you wish to be printed. 


64 VIC Plus/4, 16 128 
Disable LIST 775,191 775,223 774,187 775,139 
Enable 775,167 775,199 774,110 775,81 
Disable SAVE 819,246 818,73 816,136 818,180 
Enable 819,245 818,133 816,164 818,78 
Disable LOAD 816,157 816,103 814,239 —816,0 
Enable 816,165 816,73 814,74 816,108 
Disable RUN/STOP 808,239 808,100 806,103 808,100 
Enable 808,237 808,112 806,101 808,110 
Disable RESTORE 792,193 -792,7 = 792,125 
Enable 792,71 792,173 = 792,64 
Disable keyboard 6490 649,0 1343,0 2592,0 
Enable 649,10 649,10 1343,10 2592,10 
No keys repeat 650,64 650,64 1344,64 594,64 
All keys repeat 650,128 650,128 1344,128 2594,255 
Enable repeating keys (space, delete, and cursor keys) 
50,0 650,0 1344,0 2594,0 

Clear keyboard buffer (before INPUT) 

198,0 198,0 239,0 208,0 
Change character color, x is 0-7 for VIC, 0-15 for others 

46,x 646,x 1339,x 241x 

Remove line numbers during LIST 

22,35 22,35 22,35 24,37 
Enable 22,25 22,25 22,25 24,27 
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To make the function keys act as they 
do on the VIC and 64, enter these lines: 


10 C=133 

20 FOR J = 1TO7 STEP 2 

30 KEY J, CHRS(C): KEY J+1, 
CHRS(C+4) 

40 C = C+1: NEXT J 


After running this program, the func- 
tion keys will be defined as the ASCII codes 
133-140, A program could test for f3, for ex- 
ample, with something like 411 GETKEY 
AS: IF AS = CHR$(134) THEN 500. At 
that point in the program, if the user 
pressed f3, the program would go to line 
500, 





Spelling Practice 

I use “SpeedCheck” (December 1985), 
the spelling checker for SpeedScript, as 
an educational aid for my three elemen- 
tary school children. I encourage them 
to bring home a list of their spelling 
words, which I then enter into the 
SpeedCheck dictionary of words. Once 
this is done, I recite the words as my 
child types them in with SpeedScript. 
The spelling checker then highlights 
any misspelled words, 

This not only makes studying the 
spelling list more fun, it also helps the 
child learn the computer keyboard. 

Richard L. Eberhardy 


You've invented an interesting new appli- 
cation for “SpeedCheck”; it sounds as if it 
works well. 





Nested Loops 


In one of your programs, a common 
mistake was made. FOR and NEXT 
should be used in pairs, not FOR-FOR 
followed by NEXT-NEXT. A proposed 
solution for “Bug-Swatter” is to split 
that part of the program into two sepa- 
rate loops. 

G, Brandt 


That part of the program is written correct- 
ly; there’s no error in the line you men- 
tioned. The situation you've described is a 
nested FOR-NEXT loop, where one loop 
is inside another. Type in the following pro- 
gram to see how nested loops operate. It 
works on all Commodore computers. 


10FORJ = 1TOS5 

20 PRINT J, “OUTER LOOP” 
30 FOR K = 1T03 

40 PRINT K;“INNER"; 

50 NEXT K: PRINT 

60 NEXT J 


The loop that uses the variable K as an 
index, lines 30-50, counts from 1 to 3, But 
it’s completely inside the J-loop, which re- 
peats 5 times, so the K-loop counts to 3 a to- 
tal of 5 times. The “OUTER LOOP” 
message prints 5 times, while the “INNER” 
message appears 15 times (5 X 3). 

This is the correct method for using 
two loops at the same time. The inner loop 





Carotene 
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COMPUTE!’s First Book of the 
Commodore 128 

A spectacular collection of articles and programs 
‘exclusively for the Commodore 128 In 128 mode. 
Edited 

The editors at COMPUTE! Publications have col- 
lected some of the best games, programs, and tu- 
torials for the Commodore 128 from COMPUTE! and 
COMPUTE!'s Gazette, plus some never-before- 
published articles and programs, Learn how to cre- 
ate windows, program sound, and make disks 
autoload. You'll even find a map of all the important 
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user. All programs tun in 128 mode: A disk is avail- 
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Electronic Computer Projects 

Learn how to build all kinds of new devices to 
Interface with your computer from Inexpensive, 
available parts. 

For the Commodore 64, 128, VIC, and any elght-bit 
Atari personal computer. 

Soori Sivakumaran 

This introduction to digital’electronics and computer 
interfacing is the easy way to learn how computers 
interact with the outside world, Using a Commodore 
64, 128, VIC; or any eight-bit Atari computer and 
Electronic Computer Projects, you'll be guided 
through the steps to building a joystick, light pen, 
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since each project is independent from the others, 
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All the projects can:be built at home and most re- 
quire fewer than half a dozen parts. 


$9.95 ISBN 0-87455-052-1 











is said to be nested in the outer loop. Note in 
the example above that line 10 starts the J- 
loop and line 60 ends it. The K-loop runs 
from line 30 to 50. The first loop to start 
should always be the last to finish. Another 
way of looking at it is that a nested loop 
should be completely inside the outer loop. 

Placing one loop inside another is a 
useful programming technique. It’s used 
widely in alphabetizing and sort routines 
and comes in handy when you're working 
with arrays. 





The Paperwork Stacks Up 

Here is a program that doesn’t work on 
my 128; 

10 FOR A = 1T0 10 

20 PRINT “HELLO”; 

30 GOSUB 200 

40 END 

200 PRINT “GOODBYE” 

210 NEXT A 

220 RETURN 


I've programmed for a few years 
with the Apple Ile, TI-99/4A, and now 
the 128, and I can’t say Ive run across 
this problem before. Could you please 
explain why this program won't work? 

L. Darrell Olson 
You cannot split a FOR-NEXT loop, putting 


the FOR in the main program and the 
NEXT in a subroutine. Here's why: 





Imagine that you've received several 
letters in the mail and you place them, one 
atop another, in a neat pile. Each piece of 
mail is covered by another, except the one 
on the top. To get to the third one down, you 
must remove the two letters from the top. 

Computers have an area of memory 
called the stack, which operates a lot like 
this fictional pile of correspondence. You 
can push numbers onto the stack and pull 
numbers off the top. But only the number on 
top of the stack is directly accessible. 

The Commodore 128 (as well as the 
VIC, 64, Plus/4, and 16) saves various 
information on the stack. In a simple FOR- 
NEXT loop, the FOR pushes information 
about the loop onto the stack. Then, when 
the 128 sees the NEXT instruction, it pulls 
that information off the stack and decides 
whether the loop should continue or end. If 
the loop isn’t finished, the information re- 
mains on the stack. The most recently start- 
ed loop has its data on top of the stack. 

Incidentally, this is the technical rea- 
son for the nested-loop rule mentioned in 
the previous letter. If you start the first loop 
with the index variable J, the J information 
is pushed onto the stack. Then, when you 
start the K loop, the K information is pushed 
on top of the stack. The NEXT K must come 
before the NEXT J, because the loop infor- 
mation for K is higher on the stack. 

Subroutines also use the stack. When 
GOSUB 200 (line 30) executes, the 128 has 
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to remember where to come back to when 
the subroutine is done. The relevant infor- 
mation is pushed on the stack. When RE- 
TURN ends the subroutine, the computer 
pulls that data back and jumps back to the 
line after the GOSUB. 

In your program, the FOR pushes some 
information on the stack, then the GOSUB 
pushes more information (which is now the 
top of the stack). When the NEXT occurs 
within the subroutine, your 128 tries to lo- 
cate the information about the loop. But 
what it finds on the stack is the GOSUB, 
which isn’t the right information. As a re- 
sult, it stops and prints the NEXT WITH- 
OUT FOR error, 

This is not a quirk of Commodore com- 
puters. You'll find that the Apple and TI re- 
turn similar error messages (the message is 
worded differently, but the error has the 
same cause). 





Hidden Lines 

How do you make a line number disap- 

pear when someone tries to list a BASIC 

program? Also, how do you make an 

entire line flash and then erase itself? 
Mark Sanders 


List the line you want to flash and add a 
colon, REM, and a quotation mark: 


:REM” 


Press RETURN and then cursor back 
up to the end of the line. Press CTRL-9 
(RVS ON) and then type enough reverse 
T's to match the number of characters up 
to and including the quotation mark after 
the REM. When the line is listed to the 
screen, the reverse T’s act as delete char- 
acters. The line prints and is quickly 
deleted. 

This trick doesn't prevent users from 
listing to the printer, however, because 
it's not possible for printers to delete or 
erase characters once they've been printed 
on paper. 


Golfing Stats 


For two years I've been using a BASIC 
program for the 64 to calculate handi- 
caps and keep win/loss records for my 
Retiree’s Golf League. My problem is 
that the league expands to 160 players 
each winter and the program uses a di- 
rectory entry for each man. I therefore 
can handle only 144 golfers on a single 
disk, with the records for the extras on a 
second disk. 

Last summer I purchased a Com- 
modore 128 with the expectation that 
when I bought a 1571 disk drive, it 
would use both sides of the disk and 
allow 288 directory entries, But, alas, 
the 1571 allows only 144 entries. So this 
past winter I had the same problem. 

It has occurred to me that maybe 
there could be a way to get 288 entries 
by reprogramming the 1571 to use only 








one side of the disk at a time. If you 
could help, I’d appreciate it. 
George Cowing 


You're right, the 1541 and 1571 both have 
a limit of 144 directory entries. The direc- 
tory track contains exactly 18 disk sectors 
and each can hold information about 8 
files. Hence the 144 entry maximum. 

You're also right about expanding the 
1571's directory to 288 entries. The 1571 
can treat double-sided disks as if they are 
two single-sided disks. 

First, insert a new double-sided disk 
into the drive and type two lines: 
OPEN15,8,15,”U0>M0” 

CLOSE15 


This makes the 1571 act like a single- 
sided 1541, Think of MO as “mode zero” 
(M1 turns the drive back into a double- 
sided 1571, which is mode one), Be sure to 
type the 0's as zeros, not the letter O. 

Even though it's using only one side, 
the 1571 still has two read/write heads 
(head 0 and head 1). Turn on head 0 and 
format that side of the disk with the fol- 
lowing lines: 

OPEN 15,8,15,"U0>H0” 
PRINT#15,“NO:diskname,id” 
CLOSE 15 


Formatting erases everything on the 
disk, so be sure not to use a disk contain- 
ing anything you want to keep. Now type 
the three lines above again, but substitute 
“U0>H1” in the first line (this switches 
over to read/write head 1). Also, use a dif- 
ferent disk name and a different ID. The 
different ID is essential; if you use the 
same ID, you may encounter some serious 
problems, 

Once you've created the two-headed 
disk, you might want to mark the label so 
that you don’t treat it as a normal double- 
sided disk. To use the disk in your pro- 
gram, you'd want to find a dividing point; 
for example, names A-M on one side and 
names N-Z on the other, Start the pro- 
gram with the “U0>MO0" command to put 
it into mode 0 (1541 emulation), and then 
switch sides by sending “U0>HO" and 
“U0>H1" to channel 15. 

One more thing: When you send the 
command to switch sides, you should not 
have any files open. Close all files (except 
the disk command channel 15) before 
changing read/write heads. After switch- 
ing, it wouldn't hurt to initialize the disk 
by issuing a DCLEAR (128 mode) or a 
PRINT#15,"10" (64 mode). 





Safe Memory 

Thave a couple of questions about pro- 
grams for the 64, The program “Arcade 
Baseball’ (May) begins with POKE 
56,48: POKE 55,0. What do these 
POKEs do? I have seen them in other 
programs, so they would seem to have 
some widespread use. When I enter 
them in direct mode, however, nothing 
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seems to happen, 

Also, very often in machine lan- 
guage programs, I see the number 169 
followed by the number 0. Is there 
some special significance to these two 
numbers? 

Paul Dexter 


When you first turn on a 64, you'll find the 
numbers 1 and 8 in locations 43-44 and 
the numbers 0 and 160 in 55-56. These 
numbers refer to memory addresses; to 
convert them into decimal notation, mul- 
tiply the second number by 256, and add 
the first number (8 times 256 is 2048, then 
add 1 to get 2049), The pointer in address- 
es 43-44 contains the lowest address 
available for a BASIC program, which is 
2049 ($0801 in hexadecimal notation). Lo- 
cations 55-56 point to 40960 (hex $A000), 
one byte above the highest location avail- 
able for a BASIC program. These are 
sometimes called the bottom of BASIC 
and the top of BASIC, respectively. 

Locations 43-44 and 55-56 are im- 
portant because they tell the computer 
which part of memory is not currently 
used by the system. Because it’s free mem- 
ory, you can put BASIC programs and 
variables in this space, After a program is 
loaded, another pointer at 45-46 is set. 
This pointer, sometimes called bottom of 
variables, indicates where the BASIC pro- 
gram ends and variables begin. All of the 
memory between the bottom of variables 
and the top of BASIC is open; when you 
run a program, variables are stored here. 

This poses a problem for sprites, hi- 
res screens, custom characters, machine 
language (ML) programs, and anything 
else that needs memory. If you put an ML 
program in the variable space, chances 
are good that variables will eventually 
overwrite the program. 

POKEing new values to 55-56 and 
issuing a CLR command moves the top of 
BASIC. The number in 56 should be lower 
than its usual value of 160, This reduces 
the memory available to BASIC programs 
and variables. It also sets up a section of 
memory that's safe from BASIC. “Arcade 
Baseball,” for example, needs some safe 
space to keep the sprite shapes and custom 
characters. 

Entering the POKEs in immediate 
mode might seem to have no effect. But if 
you type PRINT FRE(0) before and after 
the POKEs, you'll see a reduction in the 
amount of free memory. You haven't real- 
ly removed any memory from the com- 
puter; you've just told it that BASIC 
programs must fit within a smaller 
amount of memory. 

The 169 and 0 you've noticed in ma- 
chine language programs means LDA #0 
(LoaD the Accumulator with the number 
0). This is a common ML instruction, one 
that's usually followed by a store (STA) 
command, To read through a machine 
language program, you need a disas- 
sembler, which is a program that trans- 
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lates numbers like 169 and 0 into 
corresponding, easier-to-understand 
mnemonics such as LDA #0. 


Reading Alternate Disk Formats 
I have trouble booting WordStar for the 
Kaypro II on my 128 and 1571, On the 
Kaypro, all I have to do is type WS and 
the program is booted. On the 128, I’ve 
tried typing WS, After about ten sec- 
onds, the disk drive stops and KAYPRO. 
IV appears in reversed characters on the 
bottom of the screen, The cursor 
doesn’t appear again until I press RE- 
TURN, Can you help? 

Paul Van Beber 


With certain disk formats, CP/M can't tell 
for sure which computer the disk came 
from. The KAYPRO IV prompt is essen- 
tially asking you if you're using a Kaypro 
IV disk. You're not, so press the right and 
left gray cursor keys (above INST/DEL on 
the top row) to select Kaypro II. Then 
press RETURN. If you plan to use several 
Kaypro II disks, you can lock in this for- 
mat with CONTROL-RETURN instead of 
RETURN. If you do this, you don’t have to 
select Kaypro II every time you swap 
disks, 

For more about disk formats, type 
HELP while side 1 of the CP/M disk is in 
the drive. Select the topic C128_CP/M 
and subtopic MFM_FORMATS (type the 
back-arrow key above CONTROL to get 
the underline character). 





Disk Flaws 
T own a 64 and 1541 disk drive. When I 
type LOAD“’$’,8 on one of my disks, it 
prints SEARCHING and LOADING, but 
then the red light starts blinking. I’ve 
used this disk before and it has been 
formatted. What did I do wrong? 
Alfred Schmalfuhs 


Your letter mentions a single faulty disk, 
Assuming that you have other disks which 
work with your system, you can probably 
rule out the computer and disk drive as 
the cause of the problem. It's likely that 
you have a bad disk. Depending on what 
went wrong with it, you may or may not 
be able to salvage its files. 

Since you can’t LOAD“$” to get a di- 
rectory, there may be something wrong 
with the directory track. Run the follow- 
ing program after attempting to load the 
directory, while the 1541's light is still 
flashing: 

1 OPENI15,8,15 
2 INPUT#15, E,E$,T,S: PRINT E,E$,T,S 
3 CLOSE15: END 

You should see the error number, the 
error message, and the track and sector 
where the problem occurred. If the prob- 
lem is on track 18, something has hap- 
pened to the directory. Initializing or 





validating the disk may help. First, enter 
this line: 


OPEN15,8,15,10"; CLOSE15: LOAD“$0”,8 
If that doesn't work, try this: 
OPEN15,8,15,"V0" 


The process of validating a disk takes 
some time, When the drive busy light 
turns off, enter CLOSE15 and try loading 
the directory again. 

The directory track may be scram- 
bled, which means initializing and vali- 
dating won't have any effect. One possible 
cause of a scrambled directory is misusing 
@ program that writes directly to a disk 
and putting the wrong bytes in the wrong 
places. You may be able to fix it with a 
“track and sector editor” program, if you 
can figure out which bytes should be 
changed. You'd have to know how infor- 
mation is organized on Commodore disks 
and be able to recognize the bad bytes for 
this to work. 

You may also have a magnetism 
problem; disks can be adversely affected 
by magnetism from a motor, a television, 
or some other electrical equipment. This is 
not usually something to be concerned 
about; the magnetism put off by most 
equipment is fairly weak and frequently 
won't have any effect on disks, 

The disk itself may have a physical 
flaw, which could have been there when 
you bought it or could have been a result 
of improper handling (poking it with a 
ballpoint pen or touching the exposed disk 
surface, for example). If the disk is dam- 
aged, there's usually nothing you can do 
to repair it, 

Finally, the disk may simply be stuck 
in its sleeve, unable to spin properly. You 
may have accidentally set a heavy book on 
top of it or squeezed too many disks into a 
disk box. The solution to this problem is to 
put two fingers in the middle of the disk 
and gently turn it. This should loosen it 
enough to allow it to spin. 

If any of these suggestions help and 
you're able to load the directory, it would 
be prudent to immediately back up the 
files on the disk, If it failed once, it may 
fail again. 


The 128 Memory Expander 

I have some questions about the 1700 
RAM Expansion Module | just pur- 
chased. I had hoped I would be able to 
address the 128K in banks 2 and 3 using 
the Kernal INDFET and INDSTA rou- 
tines ($FF74 and $FF77) as I do with 
bank 1. Apparently this is not the case; 
the 128 thinks bank 2 is bank 0 and 
bank 3 is bank 1, 

Is it possible to directly access the 
expansion memory using the techniques 
I use for bank 1? If not, then how do 
you “swap” a block of memory in ma- 
chine language? If Commodore never 
intended to allow direct access of the 
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Subscribe to -COMPUTE!'s Gazette today 
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another computer magazine That's because 
Bachssue af COMPUTEVs Gazette comes 
complete, with upto 20 all-new, action-packed: 
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programs for your Commodore computer— 
programs like Disk Editor, Mini-Filer, Arcade 
Baseball/Budget/Planner/Sound Designer, 
SpeedSoript, and hundreds of other educa: 
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Computerized order entry, processing 
and status. allow TCP to serve you ea 
faster and better! - 


Priiit Shop 


semaine tt 

Print Shop Companion $CALL. 
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oe 

‘1h red," blue, Epold- ‘$8.95 
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General Acct System 


for the C128 in 128 mode 
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‘Check Writing [7 Job’ 


PANASONIC 
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PRINTER TYPEWRITER 
$264 

Daisywheol Printer, Portable 

Typewriter, Built in 


PRINTER PACKAGES 


all packages work with C64 or C128 











Correction Tape IL y=.’ NX-10 & Xetec Supergraphix $309.95 
PRINTERS SEQ” tux-10 & xetec Supergraphixjr...$284.95 
sion? PANASONIC 
1091 & Xetec Supergraphix . «$289.95 
1080 & Xetec Supergraphix jr. $29.95 
Packages Available! All printers/intertac II for details! 
CLOSEOUT 
SPECIAL! We are a Commodore authorized service center 
‘ord, +164 Out of warranty repair rates: prices include all parts 
RCE RAR C-64 $69.95 and labor, 30 day, 
$14.95 1541 .95 warranty, and UPS 


C12 return ground shipping 
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‘Shipping: $4.00 lor software ‘and accessories’$10.00 for printers. and MITEY Mi Works with Print Shop! 
Color monitare/$B.00 (or disk drives and othier monitors’ Add $3.00 per box VIP TERMINAL. M $139 
shipped: COD. Cal or athor shipping charges. Adainonal shipping ¢e Y VIDTEX TERMINAL... $23.95 
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TUSSEY COMPUTER PRODUCTS iiolttee. pa r001 





128k CLASSIFIEDS 


INFORMATION AND OPEN 9-8 Mi 
PA ORDERS 814-234-2236 

GAMER Indiana Jones. $22.95 
BEST SELLING GAMES. Quake minus one $17.95 
Hitchhiker's guide $22.95 Shadowtire $17.95 
F-15 Strike Eagle. $21,95 The Perfect Score: Prop tor 

Fight Suter g2205 | CALL-FOR PRICING ON OTHER 
FS Il Scenery disks $15.95 MINDSCAPE PRODUCTS 


Jot $29.95 


Microloague Baseball $27.95 
Microleague general manager 

disk. $27.95 
Microleague 1985 teams .... $15.95 
Hobbit Scall 
Sargon til $97.95 
Murder by the Dozen $24.95 
ACTIVISION 
‘Alcazar $19.95 
Borrowed Time. $19.95 
Computer Fireworks. 
Golobration $19.95 
Countdown to shutdown... $19.95 
Fast Tracks Slot Car Const... $19.95 
Garry Kitchen’s Gamemaker . $24.95 
Great Amer RR $22.95 
Hacker $19.95 
Litie Computer People $24.95 
Master Of Lamps. $19.95 
Mindshadow $19.95 
Pitfall I: Lost Caverns. $19.95 
Space Shuttle, $19.95 
‘BRODERBUND, 
Championship Lode Runner . . $24.95 
Karatoka $19.95 
Lode Runner $24.95 
Music Shop. $29.95 
BLUE CHIP 
Baron. $24.95 
Millionaire $24.95 
Tycoon $24.95 


ELECTRONIC:ARTS: 
‘CALL FOR OUR LOW PRICE ON ALL 
ELECTRONIC, ARTS PROOUCTSII 


EPYX 


‘Summer Games. $26.95 
‘Summer Games Il $26.95 
Winter Games $27.95 
Vorpal fast loader Scall 
Call for prices on other EPYX 
products!!! 

(NFOCOM 

Cut Throats. $22.95 
Deadline $25.95 
Enchanter $25.95 
Hitchhiker's Guide $22.95 
Infidel $29.95 
Invisiclues 36.95 
Planettall $25.95 
Sorcerer. $29.95 
Spelibroakor $29.95 
Suspect $29.95 
Wishbringer $25.95 
Witness $25.95 
Zork | $22.95 
Zork Wl $26.95 
Zork I $26.95 
WINDSCAPE! 

Bank Streot Music Writ... $27.95 
Bank Street Storybook $27.95 
Castle Clobber $18.95 


$159 DAVE 


1. YEAR WARRANTY 





MICROPROSE 
Acrojot $24.95 
Crusade In Europe $27.95 
Decision in the Desont $27.95 
F-15 Sinko Eage. $21.95, 
Gunship. $24.95 
Conflict in Vietnam Scall 
Holicat Aco $21.95 
Kennedy Approach $24.95 
NATO Commander $24.95 
Silont Servico $24.95 
Solo Flight $24.95 
Spitfire Aco $21.95 
Top Secrot $24.95 
SIMOW A SHUSTER 
Gl. Paper Airplane const Scall 
JK Lasser’s Income Tax 

guide $39.95 
Kermit's Story Makor $19.95 
NY Times Crossword Puzzle 

Vol, 1 0F 2 $14.95 
Spy Hunter $31.95 
Star Trek-Kobayashi alt $29.95 
Typing Tutor II $29.95 
‘SPINNAKER: 
‘Adventure Creator $22.95 
Alphabet Zoo $16.95 
‘Cosmic Combat Scall 
Delta Drawing $19.95 
Facemaker $19.95 
Hey Diddle Diddie 516.95 
Homework Helper Scall 
In search of the most amazing 

thing $10.95 
Kung Fu. SCALL 
Snooper Troops | or Il $18.95 


Call for Prices on other SPINNAKER 
Software 
STRATEGIC'SINULATIONS: 

CALL FOR OUR LOW PRICE ON ALL 
881 GAMES: 


MISCELLANEOUS 
(64. WORD) PROCESSORS 
Paperback Writer Seal 
Bank Stroot Writer, Seal 
Bank Stroet Spollor $34.95, 
Font Mastor It $34.05, 
Wordpro 64. $36.05 
Spolipro 64 $92.05 
Wordpro 3 + /64 $19.95, 
Floot System It Scall 
Paporcip $97.95, 
Paporctip wispolipack $49.95 
Mirage Professional WP. $36.95 
Tho. Scall 
Kid Pro Qyo $92.05 
‘C64 DATABASES: 
Bank Stroot Filer $34.05 
Consultant $39.05 
Mirago Database wiReport 

gon $36.05 
Profil 64 $36.05 


RGBI/COMPOSITE 
MONITORS. 
)SCALL 


rood availabip at ick of piviteh 
‘Thompson Monitor $CALL 
4 modes of operation. Ali cation 
1a: 128 iocludod. 








Filo Now Scall 
Pracitle, Scait 
CH SPREADSHEETS 
Vizastar 64 $79.95 
Pracitcal(d) or (1) Scall 
Caixit $39.95 
Hes Multiplan $29.95 
PS, Tho Programmable 

Sproadshoot $19.95 


Cale Result Adv (4.0) 
‘MONOCHROME MONITORS. 
(Composite Input) 
NEC 1205 12" ambor 
wisound. 
Goldstar MBM2233 12" 
‘amber. 
Goldstar 12° 
‘green 
Zenith 1220 ambor flat 
scroon $99.95 
Zenith 1230 green tat screen. $99.95 
Din to RCA phono jack cablo .. $6.95 
RGB to RCA phono jack cablo $9.95 
COLOR MONITORS: 
SAMSUNG 14° Color 


$67.00 


$89.95 
$79.95 
$79.95 


composite $139.00 
Taxan 220 Color composite. sop. 
video $169.00 
Sakata SC-100. $149.00 
CARDCO 

Numeric keypad. $34.95 
5 slot cart. exp $54.95 
S'more Basic $49.95 
Urimes 

Morin 64 $34.95 
Fast Load $24.95 
Pal 64 $32.95 
Powor 64 $32.95 
Toolbox 64 $59.95 
CSM 1541 align $34.95 
Mach 128 ‘call 
C Power $69.95 
(ERUINTEGHATED PACKAGES 
Vizastar 8K $79.95 
Trio. ‘call 
Homepack: $99.95 
MISCELLANEOUS 

Estos power supply for C-64,. SCALL 
Koalapad $59.95 
Koala Gibson Light pen $49.95 
Naverone 3 Slot expander, ... $27.95 
GRAPHICS, 

Print Shop $25.95 
Graphics Library I oF ih. $16.95 
Nowstoom. 534.95 
Clip Ant $19.95 
Clip Art I Scall 
‘FiaRETAL BVAGBOURNIHG 

Soltsyne Pors, Acct $92.05 
Cont, Home Acct $46.95 


‘Timoworks Gonoral Lodger, A/R, A/P, 
Payroll, Invontory.. .., $40.95 each 
Infodosigns Gonoral ledger, AP, WR, 


Payroll, Inventory. Scall 
Cashbox $36.95 
‘ACCESS! 
HAYDEN! 





CAULFOR OUR LOWPRIGE ON ALL 
‘ACCESS /AND HAYDEN PRODUCTS!) 


SEIKOSHA 


SP=1000,VO\5..$179 
Commodore ready, NLQ 
modo, tritiomand tractor 
food standard 
SP-1000.... SCALE 
Contronics parallo) 
version ot above printer 





10-5 Sat EAST COAST TIME 


128= 
HARDWARE: 
1670.53 .$157.95 


C128 

1571,.1572: DRIVES 

1902\MONITOR 

MPS 1000 PRINTER 

1350. MOUSE 

1700,1750, RAM 
EXPANSION: 


LOWEST 
PRICES 


SAVE A BUNDLE ON-A BUNDLE 
PACKAGE DEALS AVAILABLE 
CALC FOR DETAILS 


COMMODORE ‘SOFTWARE 


WORD PROCESSORS 
VEANNVOTETZE 
WORDPRO 128; 
PAPERCLIPS <2). - scons 
PAPERCLIP WISPELLPACK: i 
WORD WAITER 128 WISPELLER ..)».» 349.95 
PERFECT WRITER SSCALL 
Papechack Writer 128, Seal) 
SPREADSHEETS 

EPYX. MOLTIPLAN 128. 
PERFECT CALC) 
‘SWIFTOALC:126 W/SIDEWAYS. 
VIZASTAR 328 so. 

Yotearated Spreadsheet Baiabuse, Graphics 
MISCELLANEOUS 128 SOFTWARE 
PERFECT FILER 

ANE. 
‘SUPERBASE 128). 

CONSULTANT: 128... 

‘Sylvia Porter's Financial Planner <> 
‘Data Manager I: 

Macti 128 trom Aco 

NEW TITLES EVERY:DAYi 

CALL FOR LATEST INFORMATION), 


‘SLOWEST PRICE CALL’ 


34895 
QSCALE 
7349.95 
SCALE 





SNSCALY 
{$32\95. 
7369.95 
$39.95 
S SCALE 
2549.96. 
$34.95, 






















‘ANEW.STAR 
1S. BORN} 
NX1D eal foe price nals, 

SL10C:0r 

SG+100).0r nya n$226. 
‘Commodore ready: 
SG-15) 

SD-10.. 
SD-18).. 
POWERTYPE 
18cps dalsywheel 
SR40)SR-15 »,SCALL 

















Ress ic 
SUPER GRAPHIX inlay: 
theo. WBK butter down 
(oadable ots 

‘Slownst price: 
SUPERGRAPHIX jr 
printer interface, . $46.95. 


Font Master lJ. $34.95. 










CR6550 
49” Color Composite 
Monitor wisound 

Ayn warranty Irom 
Comex) wdivision 
OH EPSOO pe Valua 


$123,00) Color Wonton 
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RAM expansion, why was the MMU 
designed to handle bank 2 and 3 con- 
figurations? 

Richard W. Irwin 


It's not possible to directly PEEK and 
POKE the expansion memory; a form of 
loading and saving is necessary, Here are 
the procedures for using the memory from 
BASIC, CP/M, and machine language: 

BASIC commands to access the 1700 
or 1750 include FETCH, STASH, and 
SWAP. For example, BANKO:STASH 
1000,1024,1,2000 saves the current 40- 
column screen to locations 67536-68535 
in the expander. The BANK command at 
the beginning of the line sets the current 
bank to zero (where screen memory is 
found). The four numbers following 
STASH are the number of bytes to store, 
the starting address in the 128’s memory, 
the bank inside the memory expander, and 
the address inside the expander. To re- 
trieve the screen you saved, substitute 
FETCH for STASH. Note the two sets of 
addresses, one for memory in the 128 and 
one for memory in the expander. 

To specify a location in memory ex- 
pansion, you must include a bank and an 
address (banks in the 1700 and 1750 are 
independent of the banks inside the 128). 
The memory address can be a number 
from 0 to 65535, The 1700 (128K) expan- 
der has two banks, numbers 0-1. The 1750 
(512K) has eight, 0-7. When you STASH a 
large number of bytes to the end of a bank, 
the overflow will automatically wrap 
around to the beginning of the next bank. 

From CP/M mode you can treat the 
expander as if it were a very fast disk 
drive, called drive M:. After you PIP 
(copy) programs and files to drive M:, the 
time to load a file is almost instantaneous. 
Making disk backups is also easy. You PIP 
a disk to the expander, insert a formatted 
disk, and PIP everything to the backup 
disk. 

Accessing the memory expander in 
machine language is similar to the way 
you do it in BASIC, Several registers for 
the expander can be found at locations 
$DFO0-DFOA in bank 15. After switching 
to bank 15 by storing a zero into $FFOO, 
write to the following addresses: 


$DF02-03: Low-byte and high-byte of the 
starting address in the 128. 
Memory address (0-65535) 
in the expander. 


$DFO04-05: 


$DFO06: Bank number (0-1 or 0-7, de- 
pending on the memory size 
of the expander). 

$DF07-08; Number of bytes to send or 


receive. 


All numbers are stored low-byte first. 
When everything is set up, load the X reg- 
ister with the bank you want to access in 
the 128, and load Y with the command. 
Use $80 for STASH, $81 for FETCH, $82 
for SWAP, and $83 for verify (after verify- 
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ing, bit 5 of $DFO0 will be cleared to zero 
to indicate a successful verify). When all 
this is done, JSR to the Kernal routine 
DMA_CALL at location $FF50. While the 
memory expansion is being used, the 8502 
will be put in a “wait” state, during which 
no ML instructions will be executed. Two 
warnings: First, stay away from the 1/O 
area (SFDO00-FDFFF) in the 128; at- 
tempting to store to bank 0 or bank 1 may 
result in bad values being written to the 
VIC chip or one of the CIA chips. Second, 
the 128 should be running at 1 megahertz 
(SLOW mode). FAST mode may affect the 
timing of the memory transfer. 

To answer your other question: The 
128's nonexistent banks 2 and 3 are men- 
tioned in some Commodore technical 
notes as provisions for future upgrades 
(the Commodore 256, perhaps?). There's 
no indication at this time that Commodore 
plans to develop or market such a ma- 
chine, but it’s a possibility. 


Array Variables 

I'm writing a program that chooses ran- 

dom numbers in a FOR-NEXT loop and 

prints them in various ways. But the 

numbers always turn out to be zero. 

Here's part of my program: 

10 FORA =1TO2 

20 B(A) = INT (RND(1) * 10 +1): NEXT 

30 PRINT B1; “+; B2;; INPUT C 

Of course, my program is more ad- 

vanced than this, but this seems to be 

where the bug is located. Could you 

please tell me what's wrong and why? 
Uzair Hameed Ismail 


Your program is correct up to a point. The 
FOR-NEXT loop assigns random numbers 
between one and ten to array variables 
B(1) and B(2). But when you print the vari- 
ables in line 30, you're using the wrong 
variable names. It should look like this: 
30 PRINT B(1); “+”; B(2); INPUT C 


Note the parentheses around the numbers. 
Variables B(1) and B(2) are part of an array 
(a list of variables), while variables B1 and 
B2 are ordinary scalar variables (indepen- 
dent variables not connected with a list). 
Because you used B(A) in line 20, you 
should use B(1) and B(2) in line 30. 

The reason you see all those zeros is 
that undefined numeric variables are as- 
signed the value 0 when you use them ina 
program. Your program hadn't done any- 
thing with B1 or B2 before line 30, so the 
computer assumes you want them to equal 
zero. 





The 128’s Keypad 
Ina program for the 128, how can you 
tell if a number was typed on the key- 
pad to the right or by the number keys 
above the normal keyboard? 

Kurt Hindenburg 





If you INPUT, GET, or GETKEY, you 
won't be able to tell the difference be- 
tween the numeric keys to the right and 
the numbers above the keyboard. When 
you're retrieving characters, a 5 is a5, no 
matter where you type it. There is a way to 
check for the two different sets of keys, how- 
ever. Try running the following program: 


10 DO: PRINT PEEK(213);; LOOP 


Press the number keys, and you'll see 
that the keypad produces numbers that 
are different from the numbered keys in 
the top row of the regular keyboard. Loca- 
tion 213 holds the keyscan code for the 
key currently being pressed (or the value 
88 if no key is pressed). Keyscan codes are 
different from either screen or character 
codes, so the numbers printed on the 
screen might not seem to be in a logical or- 
der, but there’s an internal logic based on 
the way the keyboard is wired, For more 
about keyscan codes and redefining the 
keyboard, see the “KeyDef” article else- 
where in this issue. 


Machine Language Patterns 
Is there any correlation between the 
6502/6510 opcode bit patterns and 
their addressing modes? I have written 
a disassembler in machine language 
that requires two large tables to decode 
the opcodes. If the opcodes hold certain 
addressing information, I could opti- 
mize the program dramatically. 

Rick Nash 


If you examine a sorted list of hexadecimal 
opcodes, you'll see some definite patterns 
(such a list can be found in the Program- 
mer’s Reference Guide for the 64). If the 
lower nybble is 1 ($01, 11, 21, up to $F1), 
the operation is either indirect-X or indi- 
rect-Y. Breaking it down further, all indi- 
rect-Y operations have a bit pattern of 
xxx00001, and all indirect-X operations 
are xxx10001 (where xxx could be any pat- 
tern of on or off bits). 

Opcodes with a lower nybble of $8 
are all one-byte operations (implied ad- 
dressing mode). So xxxx1000 includes 
PHP, PLP, PHA, CLC, SEC, CLI, SEI, and 
other one-byte instructions. All of the load 
opcodes, including LDA, LDX, and LDY 
have a pattern of 101xxxxx, a high nybble 
of either $A or $B. Many other correla- 
tions can be discovered if you study the 
list. 

Knowing the patterns may not speed 
up your disassembler or reduce the 
amount of memory it needs, however. You 
may find that using a lookup table is faster 
and more efficient. If it's any comfort, 
popular monitor programs like Supermon, 
VICMON, and the Commodore 128’s 
built-in monitor all use tables rather than 
mathematical algorithms to disassemble 
opcodes. @ 





The #1 DISK UTILITY FOR OVER A YEAR, STAYS #1! 


CACTLIACIZI-R[ 


























FOR THE COMMODORE 64/128 | 


* Back-up all standard disks in less than 2 minutes. 
SINGLE + Using a C-128 and 1571 in 128 mode, copies top or bottom side in only 70 seconds! 
1541 /71 + Fast file copier, Copies a 100 block file in 20 seconds! Formats a disk in 8 seconds! 
+ Nibble a protected disk in just over 2 minutes, tracks 1-40. 






















TWO * Back-up a standard disk in only 35 seconds! 
f + Nibble a protected disk in under 60 seconds, tracks 1-40. 
1541/71'S «Equipped with Special Auto-Backup** 


MSD + Automatic Backup of nearly all protected disks in 70 seconds! 


+ Also equipped with Special Auto-Backup** 
DUAL DRIVE says ii 



















+ Built-in FASTBOOT, Can be used to load other programs up to 7 times faster than normal, EASY TO USE 
* Also included is an extensive 28-page documentation manual, ALL VERSIONS 
ON ONE DISK 


ONLY $29.95 
ADD $3.00 SHIPPING 













What sets Fast Hack'em apart from our nibbling competition: 
{t's called a Parameter Copier. By using special copy parameters that tell the nibbler how to either copy or remove 
protection from a particular disk, programs that would normally be impossible for any nibbler to ever copy are 
easily backed-up by Fast Hack’em 
Parameter updates of 25 to 30 new parameters are released bi-monthly and are $6.00. Major disk updates will be 
announced when available and are $12,00 + original disk 
















Check, Money 








**SPECIAL vi Order, VISA, 
Dealer Auto-Back-up After booting up, the computer is no longer necessary, and may be = MASTERCARD 
Inquiries disconnected, The drives automatically detect the disk being inserted and removed, Accepted 
Welcome! ‘An absolute must for multiple back-ups!!! ‘Add $3,00 for 
" Allroutines are highly reliable and include full verity option COD's 







BASEMENT BOYS SOFTWARE (503) 256-5506 


P.O. Box 30901 Portland, OR 97230-0901 


Have your C-128* look 
as smart as — 


it works... 


with the Command Center, a space 
saving cabinet specially designed for the 
C-128 Personal Computer System. Just 
install your keyboard and disk drives, set 
your CRT on top, and you've got 
Commodore value with the look of a much 
more expensive system, 
It will untangle your wires and unclutter 
your desk, And look at all it includes: 
@ Built-in AC Power Strip with surge 
protection and line noise filtering. 
@ Built-in Drive/CPU Cooling Fan. 
@ Phone/Modem 
telecommunications switch. P 
@ Master A.C, Switch with power «c.126's.aregitorad Tiademark of Commodore Busnoss Machines, 
indicator light. Vegaiteeenn eo ere eee eon eee iat 
Free 30-day trial offer and one year KETEK, P.0. Box 203, Oakdale, 1A 52319 
warranty. Order your Command Center YES! Rush mea Command Center! Name __ 


today. Write: KETEK, P.O. Box 203, complete my C-128 system. | may 
Oakdale, IA 52319. enjoy it for up to 30 days and return it 
for a full retund. Enclosed is my check 
‘or money order for $153.45 ($149.95 
plus $3.50 for shipping and handling), City — — Stato — Zip —— 


DEALER INQUIRIES INVITED 




























Addross = 2 








x= B) For faster service, call 
1-800-626-4582 toll-free. 
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THE 64C 


A : 
NEW LOOK 
me POlkeA N 


OLD FRIEND 


Selby Bateman, Features Editor 











The ever-popular Commodore 64 is undergoing the first major 
change in its four-and-a-half-year history: encased in a cream- 
colored 128-style shell, and sold with a new disk-based icon- 
oriented operating system featuring a built-in word processor 
and paint program. Commodore is also placing a major empha- 
sis on telecommunications for the 64C through the Quantum- 
Link online service. For several million 64 hor 128 owners, the 
good news is that Commodore plans to continue supporting the 


64 for quite some time. 


f you can't beat them, join them, 

That's apparently Commodore’s 
philosophy as the company rolls out 
the new Commodore 64C computer. 

At least twice Commodore stopped pro- 
duction of the 64 in late 1985, only to be 
forced back to the assembly line by high 
numbers of orders for the machine. And a 
Commodore official says that the 64 was 
still backordered during the first quarter of 
1986. So, rather than try to fight success, 
Commodore hopes the repackaged and re- 
furbished 64 will continue its reign as the 
king of low-cost computers for the rest of 
1986, into 1987, and—who knows? 
Announced at the Consumer Elec- 
tronics Show (CES) in Chicago June 1-4, 
the Commodore 64C represents a major 
new direction for Commodore, which had 
been emphasizing the higher priced 16-bit 
Amiga computer and the popular 128 in 
place of the 64, But now, like the U.S. Statue 
of Liberty, the 64 is getting a major facelift 
and a new lease on life. Commodore says 


that the 64C should begin to be available 
about the time you read this, 

For producers of 64 software, Com- 
modore’s altered marketing strategy 
means two important things. First, that the 
present installed base of more than two- 
and-a-half million 64s will continue to 
grow rather than be orphaned by Commo- 
dore, giving those companies further rea- 
son to keep producing 64 software. And 
second, the new GEOS (Graphic Environ- 
ment Operating System) software to be 
bundled with the 64C, and sold separately 
to current 64 owners, will provide an 
entirely new software universe for the 
computer. 

Similar to the Commodore 128 in its 
low-slung architecture and cream color, 
the new 64C is the same 64 internally. Its 
keyboard, side and rear ports, and switch- 
es are also identical to the 64’s, The ROM- 
based operating system hasn't been 
changed either. So, all 64 software will be 
100-percent compatible. 
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Atari 

20ST 11.95 
130XE 699 
BOOXL. 699 
1050 699 
1025 799 

Commodore 
C128 799 
1971/1541 699 
1902, 40.95 
¥702 899 
Ceanvic20. 699 

Panasonic 
1090/1091 89 
1092 89 
1003, 999 


Star Micronics 





Okidata 
e292 899 
8393 999 
199 999 
INNOVATIVE CONCEPTS 
Flip-N-File 10 


EPYX-64 
Fastload 24.75 
Summer Games...) 26,75 


SUNCOM 
ICk STICK 7.95 
3 11198 


WICO Joysticks 
15-9714 Bat Handle.......16.75 
50-2030 Boss.. be: 
50-2002 Super 3-Way,...19,99 


COMMODORE 


earaal Brive BALL 
G 19024 CALL 
6 tar Brive CALL 
& 1670 Modem | CALL 
& 1980 Mouse, 39 
€ 1700 128 6 Bi 145 
G 730 512K RAM 269 

NE 35 
Bonect Writer 45 
Perfect Cale 45 
Perfect Filer 45 


UNISON WORLD 


Print Master amiga) 22. 78 
Print Master (C-1 22. 
Print Master (C-64), ae 8 
Ant Gallery 


ACTIVISION (C-64/128) 


Altor Ego 28,75 
Hackler 18.75 
Little People 2075 
Gamomaker 24.75 
Borrowed Time 18.75, 
Space Shuttle. 18.75 
Music Studio 24.75 
Mindshadow 18.75 
Roadrace 18.75 
Fast Tracks: 22:75 
Count Down 18.75 


BATTERIES INCLUDED 
Paper Clip 
Consultant 3388 
Paper cil 
wi Spell Pak... 48,95 


MICROLEAGUE 

Baseball 

Disi B48 
Team Disk 44.95 
Stat Disk 14.95 

SYNAPSE 

Syncale, 29.95 
Template 44.95 
Loderunner Rescue, 19.95 
Essox 24.95 
Brimstone 24.95 
Mindwheel 24.95 





BRODERBUND. 
The Print Shop. 247! 
Graphics Library 

18.75 
Kafateha 7.75 
Bank St. Writer 29:75 
Lode Runner 75 
Bnishep Companion, 28,78 

Bank St 29:75, 
Bank St Pher 29:75 
Bank St. Mailer 29:75 
Championship 

Loderunner 19.75 

SUBLOGIC 
Nightmission Pinball, 18.95 
Flight Simulator 31.75 
Jet Simulator 25.95 


Football 25.95 
Scenery Disk. EA. 14.95 
Set 1-6 69.95 


ACTIVISION (Amiga) 
Hackler, 

Mind Shadow, BS z 
Music Studio. 9.75 
Borrowed Time ea 75 


(Amiga) 
VIP Professional .. 119.95 


ACCESS 
(C-64—Amiga) 
Leader Board 75 
Leader Board Amiga - 24 6.78 


Tournament | 
MACH 128 B28 


CARDCO 


$'More Basic Rom | 39.95 
Write Now 29.95 
Freeze Frame 29.95 


XETEC 
Font Master II 64, . 26.95 


cy Lyco and Engoy 
* THE LOWEST PRICES * TOLL FREE ORDER LINE x 





ssi 
Colonial Conquest ..... 22.75 
Wings of War 22:75 
Computer Ambush $2.78 
Field of Fire 20.75 
Fighter Command || 94:75 
Kamplgruppe 3475 
Mech Brigade 34.75 
Market Garden 2775 
Six Gun Shootout 22.75 
Gomputer Baseball. 22.75 


Computer Quarterback . 22:75 
Imperium Galactum 22.75 


Phantasie 2275 
Cartols & Cutthroats.. 22.75 
80 Mission Crush, 23.75 
Questron. 15 


r 
Gemstone Warrlor.. 22:75 
Battelion Commander 22:79 


Panzer Grenider 5 
Hoewex > 22.75 
eT 
NAM 2 22.75 
Phantasig Il 22.75 
Wizards Crown, 22.75 
Rings of Zelphin 22.75 
CONTINENTAL 


Home Accountant.....39.95 
Book of Adventure Games. 
Nalsseesten 14.95 


DISK DRIVE 
CLEANING KIT 
$8.95 


With Software 
$17.95 


* Free shipping on prepaid cash orders in U.S. * All Merchandise Factory Fresh 
* Fast Service from one of the oldest and most established Computer Supplier * 
24 hrs. shipping on in-stock product * Access to our Multi Million $ inventory * 
No deposit on UPS C.O.D. orders * Orders outside PA Save state sales tax * Air 
freight service available * Full Manufacturer’s Warranty apply! * Full accessory line 
in stock * Purchase orders Accepted from educational institutions! x We check for 
stolen credit cards! * We ship to our servicemen overseas! * You'll love our 
Courteous Sales Staff! * We satisfy more customers monthly than most of our 
competitors combined * 


























EPSON LEGEND C. ITOH 
Lxgo 209 1080) Cait 1550 SP+ Call 
FX85 369 19800 388 1040 Call 
Dxt0 207 {ape 589 Brownitor Je, Gall 
HIB, 398 ae 138 rowniter 8510 SP+ Call 
(80 359 DIABLO 
ta1000 659 TOSHIBA bes Bo 
P1340. 409 080 1F 2395 
BROTHER P3514 i149 P32c01 693, 
POMP. 989 38 1749 
a ao a a Bes | 
MELAS S51 ates Feet 635 1029 Juki 6300 757 
PANASONIC RMICRONICS 
1080 4 SEIKOSHA 
1082 555 $P-1000 VC.(C-64) 185 OKIDATA CITIZEN NEW)... GALL 
3131 257 SP-1000 A Centronics. . 197 MSP-10. 268 it: CALL 
3151 399 ‘SP-1000 | 15M 197 Okimate 10. 179 MSP-15, 377 CALL 
1592 439 SP-1000 AS RS-232 197 TB2 osssse 214 MSP-20 355 367 
1595 NEW §P-1000 AP Apple lic. 197 192 348 MBP-25 528 319 
Pipi 43 Sanaa ee | 
000 ribbon remier 
SILVER REED, = Bb.i20p noon 1888 iH 578 
BP-5420 999 589 
EXP500 235 Powertype 297 
EXETA0. ee COLOR RIBBONS AVAILABLE! 
ZENITH THOMSON 
AMDEK ZVM 1220 95 CM: 
136512V1 269 
300 Green 115 2VM 1230 95 joe oar CM36632 nse 18, §¢ cope 99 
300 Amber 123 2M 1240 149° $802 Colors GALL 84 1000 13" Amber --°" 108 
4 1500 12” Green TTL. 11 
ies é&} PRINCETON GRAPHICS MDEK TEKNIKA Sk 1200 1b roe TIL 138 
s Eh RAR ag AMDEK tse ip wobectouneear aaa 
z een e 
(eo cer SR:12 RGB 575 300 Amber 128 M5305 RGB NEW. 
VERBATIM AXEL 
COMMODORE 8%" SSDD 99 td Y s199 
ABMs CALL 5%” SOD 13.99 1599 
1541 CALL 
BONUS SUNKYOUNG 
INDUS COMTEL $¥4"" SSDD 6.99 SKC 5%" SDD... 11.99 
GT Commodore 185 Enhancer 2000 (C-64). 155 5%" OSOD 899 SKC 51%4"" DSDD | || 13/99 
CARDCO 
sun crmeec....4 SIMIC... 4795 HAYES scSoniooon oss, US ROBOTICS 
Super Graphic JR 64.45 (C-64) 54 ‘Smartmodem 300... 133 Password 1200M . ... 229 
eS Srunesen 1285 31 Paver ERT 8 
ORANGE MICRO TYMAC Smartmodem 2400... 598 SUPRA Password 300F 139 


(SS TOoRDER Se 


Grappler CD (C-64) ... 79 


Connection (C-64) 






CALL TOLL FREE 1-800-233-8760 


In PA 717-494-1030 


Customer Service 717-494-1670 


55 


or send order to 


Lyco Computer 
P.O. Box 5088 


Jersey Shore, PA 


17740 


1064 Modem (C-64) 49.95 


RISK FREE POLICY 

lerstock items shipped within 24 hours of order. No deposit on C.O.D. orders. 
Free shipping on prepaid cash orders within the continental U.S. Volume 
<iscounts available, PA residents add sales tax. APO, FPO, andintemational 
‘orders add $5.00 plus 3% for priority mall service. Advertised prices show 
4% discount for cash, ferCard and Visa. Personal checks 
require 4 weeks’ clearance before shipping. Ask about UPS Blue and Red 
label shipping. All merchandise carried under manufacturer's warranty. Free 
Catalog with order. All tems subject to change without notice. 












However, the real story of the 
64C is not the new look, but the 
software and hardware additions: 
GEOS, the new user interface and 
operating system software; the tie- 
in with the QuantumLink online 
service; and the new peripherals 
that will support the 64, including 
the Commodore 1581 3¥2-inch 
disk drive (around $225), the stan- 
dard 1541 disk drive in a new 128- 
colored case, and—later on—128K 
and 512K memory expanders for 
the 64 (already available for 128). 
Happily, all of the new software 
and hardware can be used by cur- 
rent 64 owners as well. 


urchasers of the Commodore 

64C will pay around $160 to 
$180 for the computer itself, The 
machine will come with a disk con- 
taining the GEOS user interface, op- 
erating system, and applications on 
one side and the QuantumLink 
Commodore-specific telecommuni- 
cations program on the other. Pre- 
sent 64 and 128 owners can buy the 
GEOS/QuantumLink disk from 
Berkeley Softworks or retail dealers 
for $59.95. QuantumLink, a Com- 
modore-specific telecommunica- 
tions network, charges a flat $9.95 
monthly fee rather than the more 
expensive per-minute online con- 
nect fees used by other services, 
The 64C will also be bundled with 
an educational program on disk, 
Odell Lake, an environmental simu- 
lation of a lake that teaches children 
from five to eight years of age how 
such a habitat functions among its 
plant and animal inhabitants. 

For those unfamiliar with 
GEOS, the system looks and feels 
very much like the user interface on 
the Macintosh, Atari ST, and Com- 
modore Amiga computers. Includ- 
ed are icons representing different 
files and functions, pull-down 
menus, screen windows, a variety 
of type fonts, and bitmapped 
graphics. The GEOS operating sys- 
tem speeds up the 1541 disk drive 
in all its operations, generally from 
five to seven times normal speed. 
And GEOS allows much easier 
movement between applications. 

GEOS is composed of four 
main programs, geoWrite, a word 
processor; geoPaint, a paint pro- 
gram; GEOS, the operating system; 
and GEOS deskTop, the user inter- 
face from which you control all of 
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The GEOS deskTop, 
displaying a variety 
of file icons on the 
system's Notepad, 
The menu bar is at 
the top of the screen. 


the other features, In addition to the 
four main programs, GEOS contains 
a variety of smaller accessory pro- 
grams, such as the Preference Man- 
ager GEOS control panel, a calcu- 
lator, an alarm clock, a variety of 
printer drivers, a half-dozen type 
fonts for printing, and Text Album 
and Photo Album—accessories that 
let you paste text from geoWrite into 
your geoPaint artwork—and vice 
versa, The accessories are available 
from the GEOS deskTop as well as 
from within application programs, 
such as a word processor. Move- 
ment of the screen cursor and selec- 
tion of menu items is carried out by 
use of the joystick or the new Com- 
modore 64 two-button mouse. 
geoWrite is very much like the 
what-you-see-is-what-you-get 


The QuantumLink 
opening screen offers 
a menu system of 
choices for Commo- 
dore computer users. 











MacWrite word processor on Ap- 
ple’s Macintosh computer, As with 
all of GEOS’ functions, a menu sys- 
tem is used, Text can be entered, 
edited, moved, copied, and cut. A 
variety of fonts are also available, 
as are formats such as italics, bold- 
face, underlining, and outlining, In 
standard text mode, GEOS displays 
80 columns rather than the 64's 
normal 40. And, geoWrite’s high- 
resolution text display allows the si- 
multaneous use of multiple fonts, 
type sizes, and type styles, 
Similarly, geoPaint resembles 
the Macintosh’s MacPaint software, 
with its menu system and variety of 
painting tools. The original geo- 
Paint, version 1,0, was two-color 
(black-and-white), but version 1.2 
supports the 64’s full complement 





{ean 
Quan rum) 


Tae Seer 





128 


cpr 


Make your BASIC programs rux LIGHTNING SPEED! 





4|| The complete compiler 
and development pack- 
age. Speed up your pro- 
grams 5x to 35x, Many 
| options: flexible memory 
| managoment; choice of 
compiling to machine 
code, compact p-code or 
both. ‘128 vorsion: 40 or 
80 column monitor output 
and FAST-mode opera- 
tion, 1128 Compiler's ex- 
tensive 80-page pro- 
grammer’s guide covers 
compiler directives and 
ee J options, two levels of 
optimization, memory usage, VO handling, 80 column hi-res graphics, faster, 
higher precision math functions, speed and space saving tips, more. A great 
package that no software library’‘should be without, 128 Compller $59.95 
64 Compiler $39.95 











For school or software 
development. Learn © on 
your Commodore with our in- 
depth tutorial, Compile C pro- 
grams into fast machine 
language. C-128 version has 
added features: Unix™-like 
‘operating system; 60K RAM 
disk for fast editing and 
compiling Linker combines 
up to 10 modules; Combine 
MIL and C using GALL; 51K 
available for object code; 
Fast loading (8 sec. 1571, 18 sec. 1541); Two standard V/O librarys plus 
two additional libraries—math functions (sin, cos, sqrt, etc.) & 20+ graphic 
commands (line, fil, dot, etc.). C-128 $59.95 
C-64 $59.95 





EREDUGED. + 
C Gaia hp Ger 








Easily create professional 
, ; high quality charts and 
fo) Beant res graphs without programming. 
1 he yt || You can immediately change 
a " the scaling, labeling, axis, 
bar filling, etc. to suit your 
needs, Accepts data from 
CalcResult and MultiPlan, 
€-128 version has 3X the 
resolution of the ‘64 version. 
Outputs to most printers. 
C-128 $39.95 
C-64 $39.95 







































































PowerPlan 
One of the most powerful spreadsheets with integrated 
graphics. Includes menu or keyword selections, online help 
screens, field protection, windowing, trig functions and more, 
PowerGraph, the graphics package, Is included to create 


Integrated graphs and charts, C-64 $39.95 
Technical Analysis System for the C-64 $59.95 
Ada Compiler for the C-64 $39.95 
VideoBasic Language for the C-64 $39.95 


and PROVEN 
° PERFORMANCE 












Remarkably easy-to-use 


BEST _ |interactive drawing pack: 
SELLER | 302,'0" accurate graphic 
LLE designs. New dimension- 

ing features to create 

‘exact scaled output to all 


major dot-matrix printers, 
Enhanced version allows 


























you to input via keyboard 
or high quality lightpen. 
Two graphic screens for 
COPYing from one to the 
other. DRAW, LINE, BOX, 
CIRCLE, ARC, ELLIPSE 
available. FILL objects 
with preselected PAT- 
TERNS; add TEXT; SAVE and RECALL designs to/from disk. Define your own 
Uibrary of symbols/objects with the easy-to-use OBJECT MANAGEMENT 
SYSTEM-siore up to 104 separate objects. C-128 $59.95 
C-64 $39.95 























Not just a compiler, but a 
complete system for devolop- 
ing applications in Pascal 
.. |with graphics and sound 
~ Hfeatures. Extensive editor 
with search, replace, auto, 
renumber, etc, Standard J & 
W compiler that generates 
[fast machine code, It you 

want to learn Pascal or to 
develop software using the 
: best tools available-SUPER 
= Pascal is your first choice. 
C-128 $59.95 
C64 $59.95 


OTHER TITLES AVAILABLE: 


COBOL Compiler 
Now you can learn COBOL, thi st widely used commercial 
programing language, an IL on your 64. COBOL. 
is easy to learn because tead, COBOL Compiler 
package comes complet ditor, Compiler, Interpreter 
and Symbolic Debugger. C-64 $39.95 


Compiler and Software 
Development System 















Personal Portfolio Manager 
Complete portfolio management system for the individual or 
professional investor. Easily manage your portfolios, obtain 
up-to-the-minute quotes and news, and perform selected 
analysis. Enter quotes manually or automatically through 
Warner Computer Systems. C-64 $39.95 


Xper 
XPER Is the first "expert system" for the C-128 and C-64. While 
ordinary data base systems are good for reproducing facts, 
XPER can derive knowledge from a mountain of facts and help 
you make expert decisions. Large capacity. Complete with 
editing and reporting. C-64 $59.95 


(6-128 and C-64 are trademarks of Commodore Businets Machines Ino. 
Unix is a Fademark of Bl Laborato 


Abacus! |Software 


P.O. Box 7219 Dept. G8 Grand Rapids, Ml 49510 - Telex 709-101 - Phone (616) 241-5510 


Call now for the name of your nearest dealer. Or to order directly by credit card, MC, AMEX of VISA call (616) 
241-5510. Other software and books are available—Call and ask for your free catalog. Add $4.00 for shipping 
per order. Foreign orders add $12.00 per item. Dealer inquires welcome-1400+ nationwide. 


of 16 colors. (For a detailed over- 
view of GEOS, see the June Ga- 
ZETTE, ‘““GEOS: The Quiet Revolu- 
tion.”’) 

Berkeley Softworks began 
marketing GEOS by mail order prior 
to Commodore’s announcement 
that it would bundle the software 
with the 64C computer. Any 64 
owner who purchased the first ver- 
sion will automatically get the latest 
upgrades of the program free, in- 
cluding a disk with additional type 
fonts that work with geoWrite. A 
considerable number of conve- 
niences have been added in the lat- 
est version (Version 1.2). For 
example, there’s now a command 
to easily UPDATE a file as you 
work, And GEOS also automatically 
saves information to disk anytime 
you move up or down the screen or 
close your document. A RECOVER 
menu command returns you to the 
last version of your file that you 
saved, And RENAME now lets you 
rename a file with ease. Another 
menu selection, CLEAR, has been 
added to the Copy Box commands, 
Users can now make whatever is in 
the Copy Box disappear—an effi- 
cient way to erase a large area, 

Owners of the Commodore 
128 and 1571 disk drive can boot 
GEOS and use all of the functions in 
64 mode. A 128-specific GEOS sys- 
tem is planned for early fall, possi- 
bly in September. Later this summer, 
Berkeley Softworks will have a 
complete programmer's reference 
manual available—all of the tech- 
nical documentation for software 
developers who want to create pro- 
grams within the new operating 





geoPaint now 
supports color graph- 
ics, Note the color 
selection bar along 
the bottom right, dis- 
playing 16 available 
colors, 


system. In fact, that’s one of the 
long-range goals for Berkeley and 
for Commodore—to create a totally 
new operating environment for 
hundreds of future commercial 
programs. 


he QuantumLink telecommuni- 

cations software that comes on 
the back of the GEOS disk is for use 
by 64 and 128 owners only. Quan- 
tumLink, which began operations 
with marketing support from Com- 
modore in late 1985, presents its 
users with color graphics, a menu 
selection system of options, down- 
loadable software, and features 
similar to other online services. In 
addition, QuantumLink offers 64 
and 128 owners the chance to pre- 
view new commercial software 
packages online before deciding 








The Commodore 64C sports a new 128-style look, is completely compatible with 
earlier 64s, and offers a new RAM-based operating system and other options. 
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whether to buy the programs. 

Interactive online games, using 
color graphics and sound, are also a 
part of the QuantumLink service. A 
major announcement concerning a 
new interactive online entertain- 
ment program on QuantumLink is 
expected shortly after the Consum- 
er Electronics Show, The GAZETTE 
will have more information on that, 
and on additional QuantumLink 
features, in the September issue. 

As mentioned earlier, Quan- 
tumLink requires a flat $9,95 fee for 
access through local telephone 
numbers that have been set up in 
more than 500 cities. This provides 
unlimited access to most of the sys- 
tem’s services without additional 
fees, Some QuantumLink services 
do require an additional surcharge, 
but those areas are clearly labeled. 

For Commodore 64 and 128 
owners, the new 64C answers im- 
portant questions about the future of 
Commodore’s commitment to the 
64 market. Even with the company’s 
obvious long-range plans for the 
Amiga and the 128, Commodore is 
unable to ignore the enduring popu- 
larity of the venerable 64, 


For puréher informatio contact; 









‘Qui @ iter jsetotbes In 
8620 Westwood eda i 
‘Vienna, VA 22180 


C-128 


and 0-64 
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BASIC 7.0 INTERNALS 























‘Abacu 





‘Abacus BRR Softwar 





o Ab cus BE Software 








ad gu 
tng sy 
chips, Memory Management Unf, 80 
column graphics and commented 
ROM Bstings, ‘So0pp $19.95, 





Got all tho inside information on 
BASIC 7.0. This exhaustive hand- 
book is complete with comme 
BASIC 7.0 

‘Sumrmer'86, 





1OM listings. Comi 
‘$19. 


Fillod with Info for everyone. Cove 
80 column hi-tes graphics, 
dowing, momory layout, Kernal 
toutines, sprites, software pro- 
lection, autostarting. 300pp $19.95, 


Insiders’ guide for novice & 





rolative files, & direct accoss 
mands, Describes DOS rout 





























Abacus ER Software 








Abacus BRB Software 

















Introduction to programing: problem 
‘analysis; thorough description of all 
BASIC commands with hundreds of 
‘examples; monitor commands; utile 
thos; much more, $16.95 


ANATOMY OF C-64 Insiders guide to the 
"G4 internals, Graphics, sound, VO, kernal, 
memory maps, more. Complete commented 


ROM Iistings. 300pp $19.95 
ANATOMY OF 154} eDRIVE Best 
handbook on floppy: + ail, Many 
examples and UlldjepsiFUlty commented 
1541 ROM S00pp $19.95 





MACHINE LANGUAGE C-64 Learn 
6510 code write fast programs, Many sam- 
plas and listings for complete assembler, 
‘monitor, & simulator, 200pp $14.95 


GRAPHICS BOOK C-64 - best reference 
covers basic and advanced graphics. 
Sprites, animation, Hires, Multicolor, 
lightpen, 3D-graphics, IRQ, CAD, pro- 
Joctions, curves, more. | 350pp $19.95 











Abacus |! Sof 


Presents dozens of programming 
quick-hitters, 
techniques on the operating system, 








Easy and uselul 


pointers, the 


TRICKS & TIPS FOR C-64 Collection of 
easy-to-use techniques: advanced graphics, 
improved data input, enhanced BASIC, 
CP/M, more. Z75pp $19.95 


1541 REPAIR & MAINTENANCE 
Handbook describes the disk drive hard- 
ware. Includes schematics and techniques 
to keep 1541 running. 200pp $19.95 


ADVANCED MACHINE LANGUAGE 
Not covered elsewhere: - video controller, 
Interrupts, timers, clocks, VO, real time, 
extended BASIC, more, | 210pp $14.95 


PRINTER BOOK C:64/VIC-20 Under- 
stand Commodore, Epson-compatble print- 
ars and 1520 plotter. Packed: utities; gra- 
phics dump; 30-plot; commented MPS8O1 
FIOM listings, more. 330pp $19.95 





Essential guide for everyone Inter- 
@sted in CP/M on the 128, Simple 
‘explanation of the operating system, 
memory usage, CP/M utlity pro: 
grams, submit fies & more, 





$19.95, 


SCIENCE/ENGINEERING ON C-54 In 
‘depth intro to computers in science. Topics: 
chemistry, physics, biology, astronomy, 
electronics, others, ‘350pp $19.95 
CASSETTE BOOK C.64/VIC-20 
Comprehensive guide; many sample 
programs. High speed operating system 
fast fle loading and saving. 225pp $14.95 
IDEAS FOR USE ON C-64 Themes: 
auto expenses, calculator, recipe file, stock 
lists, diet planner, window advertising, 
others. Includes listings. 200pp $12.95 
COMPILER BOOK C-64/C-128 All you 

to know about compilers: how they 
work; designing and writing your own; 
generating machine code. With working 
‘example compiler, 300pp $19.95 
128 m.c-04 





vanced users. Covers sequential & 


‘Commented stings, $19.95 


TORS antten 
ee Bere 
co COMMODORI, 


rig 
Th) 





ad- Loarn fundamentals of GAD whilo 
oveloping your own systom. Design 
‘objects on your screen to dump to a 
printer, Includes listings for 64 with 
Simon's Basi, 200pp $19.95 


com: 












ADVENTURE 
GAMEWRITERS — fan scxress 
HANDBOOK FOR | rea 
































3p quide 10 designing and writing 
your own adventure games, With auomated 
adventure game generator. 200pp $14.95 


PEEKS & POKES FOR THE C.64 

Includes in-depth explanations of PEEK, 
POKE, USR, and other BASIC commands. 
Learn the “inside” tricks to got the most ou 
of your ‘64, ‘200pp $14.95, 


Optional Diskettes for books 

For your convenience, the programs 
contained In each of our books are avail- 
able on diskette to save you time entering 
them from your keyboard. Specify name of 
book when ordering. $14.95 each 








Jodemarks of Commodere Business Machines Ine, 


tware 


P.O. Box 7219 Dept.G8 Grand Rapids, Ml 49510 - Telex 709-101 - Phone (616) 241-5510 


Optional diskettes available for all book titles - $14.95 each. Other books & software also available. Call for the name of your 
nearest dealer. Or order directly from ABACUS using your MC, Visa or Amex card. Add $4.00 per order for shipping. Foreign 
orders add $10.00 per book. Call now or write for your free catalog. Dealer inquires welcome--over 1400 dealers nationwide. 


AN INTRODUCTION TO 


ASSEMBLERS 
FOR THE 


COMMODORE 64 
AND 


128 


Todd Heimarck, Assistant Editor 


If you plan to get into machine language, you need an assem- 
bler. Here’s an overview of features to consider before purchas- 


ing one—and an up-to-date list of commercially available 


assemblers. 


A machine language assembler 
turns source code written by a pro- 
grammer into object code, the pro- 
gram which can be executed by the 
computer, (Source code is some- 
times referred to as assembly lan- 
guage because it’s a language for 
communicating with assemblers.) 


M any assemblers have at least 
two parts: the assembler it- 
self and an editor program. A stan- 
dard editor allows you to enter 
source code, insert lines, delete 
lines, print out the program, and 
save a file to disk, It may be a sepa- 
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rate program, or it may be built into 
the assembler. 

An editor program is similar to 
a word processor and, in some 
cases, you can substitute your fa- 
vorite word processor if its files— 
usually sequential ASCII—are 
compatible with the files used by 
the assembler. The advantage of 
this is that you don’t have to learn a 
new set of commands for using the 
assembler’s text editor. 

There’s a disadvantage as well: 
If the editor and assembler are sep- 
arate programs, writing an ML pro- 
gram takes several steps: 1. load the 
editor, 2. type in the program, 3. 
save it to disk, 4. load the assem- 


“Tf you know BASIC and want to learn 
machine language, this is the place to start 
.,.. Building on your experience as a 
BASIC programmer, Mansfield very gently 
takes you through the fundamentals of 


machine language.’ 


—Whole Earth Software Catalog 


COMPUTE! Books’ 


Best-selling Machine Language Books 


“Understandable” —The New York Times 


“Presents the machine language novice with a very 
good tutorial in simple, understandable terms."’ 
—Antic 


“T highly recommend Machine Language for Begin- 
ners as your first introduction to the world of 
machine language.”” 


—Commodore Power/Play 


Machine Language 
for Beginners 

Richard Mansfield 

Most commercial software is 
written in machine language be- 
cause it’s far faster and more 
versatile than BASIC. Machine 
Language for Beginners is a 
step-by-step introduction. In- 
cludes a simple assembler, a 
disassembler, and utilities, to 
help beginners write programs 
more quickly and easily. 
$14.95 

ISBN 0-942386-11-6 





Machine Language for Beginners and The Second Book of Machine Language: 
everything you need to learn machine language programming 
‘on your Apple, Atari, and Commodore personal computers. 





The LADS Disk 

LADS, the assembler used in The Second Book of 
Machine Language, is available on disk for only $12.95, 
This is a great accompaniment to the book, saving you 
hours of typing time by providing the complete source 
and object programs for all versions of the assembler, 
and more. And LADS disks are specific to your Apple, 
Atari, or Commodore computers. 


The Second Book of 
Machine Language 
Richard Mansfield 

The follow-up to the best-selling 
Machine Language for Begin- 
ners, this book leads the pro- 
grammer deeper into the most 
powerful and efficient program- 
ming techniques available for 
personal computers, Fully tu- 
torial, with easy step-by-step 
explanations, the book shows 
how to construct significant, 
effective machine language 
programs. Included is a high- 
speed, professional-quality, la- 
bel-based assembler, Everything 
that’s needed for optimized 
programming on the Com- 
modore 64, Apple, Atari, VIC-20, 
and PET/CBM computers. 
$14.95 

ISBN 0-942386-53-1 


To Order: Call Toll Free 800-346-6767 (in NY 212-887-8525) or mail this coupon with 
I your payment to COMPUTE! Books, P.O. Box 5038, F.D.R. Station, New York, NY 10150. 





The Second Book of Machine Language, $14.95 
Machine Language for Beginners, $14.95 

LADS Disk (Apple) $12.95 

LADS Disk (Atari) $12.95 

LADS Disk (Commodore), $12.95 














O Payment Enclosed (check or money order) 


OCharge OMasterCard O Visa O American Express 


Acct. No. 
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Address 





City 





State Zip 











I 
I 
I 
I 
I Signature. 
I 
I 
I 
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1 Book for $1495 I 
2 Books for $25.00 
LADS Disk for $12.95 I 
NC residents add $. I 
4.5% sales tax 
Shipping and handling Si I 
($2.00 per book I 
$1.00 per disk) 
Total Paid $——_. I 
A res mes be preci I 
Precte alow 4-6 wooks for dolvery 
OMI Publications,inc. > I 
P| 





Now Get Inside Your Commodore with 





ce TTR Now there's a way to get all the exciting, fun-filled programs of 














COMPUTE!’s Gazette Disk. 


COMPUTE!’s Gazette—already on disk—with COMPUTE!’s 
Gazette Disk. 


| 

| Subscribe today, and month after month you'll get a new, fully- 

| tested 5%-inch floppy disk guaranteed to run on your Commodore 
S 64, Commodore 128, or VIC-20 personal computer. 


COMPUTE!’s Gazette Disk brings you all the latest, most 
challenging, most fascinating programs published in the 
corresponding issue of COMPUTE!’s Gazette. So instead of 
spending hours typing in each program, now all you do is insert 
the disk...and your programs load in seconds. 


RESULT: You have hours more time to enjoy all those great pro- 
grams which appear in COMPUTE!’s Gazette—programs |ike 
Disk Editor, Face-Off, Turbo Copy, Arcade Baseball, Sound 
Designer, SpeedScript, and hundreds of others. 


So don’t waste another moment. Subscribe today to COMPUTE!’s 
Gazette Disk at this money-saving price. Take a full year’s 
subscription for just $69.95. You save 55 percent off the single 
issue price. Subscribe for two years and save even more! Return 
the enclosed card or call toll-free 1-800-247-5470 now (in lowa 
call 1-800-532-1272). 


| 


Individual issues of the Disk are available for $12.95 
(plus $2.00 shipping and handling) by calling 
1-800-346-6767 (in NY 1-212-887-8525). 











bler, and 5. assemble the file into 
object code. To make changes to the 
program—if there are bugs, for ex- 
ample—you have to go back to the 
editor, load the file, and edit it. 

An integrated editor/as- 
sembler gives you both programs in 
memory at the same time. It’s not 
necessary to go through the process 
of loading one, then loading the 
other, switching back and forth as 
you develop a program. Having 
available both the editor and as- 
sembler saves time, especially for 
programmers who like to write a 
few lines, assemble them, test the 
program, make a few changes, and 
continue from there. One disadvan- 
tage of an integrated package is that 
two programs take up more memo- 
ry than a single program; you may 
have less memory available for 
storing the source code, 

In addition to separate editors 
and integrated editor/assemblers, 
there’s a third type. Some assem- 
blers let you create source code 
with the built-in BASIC editor, You 
write and edit the source code with 
line numbers, as if it were a BASIC 
program. To look at the program, 
you LIST it, To save to disk, just 
SAVE. Relying on the BASIC editor 
means it’s not necessary to load a 
separate program that takes up 
valuable memory. Also, if you use 
“BASIC Aid,” “MetaBASIC,’”” the 
“DOS Wedge,” or other program- 
ming utilities, you can usually have 
them in memory at the same time 
as the assembler and thus have ad- 
ditional conveniences such as auto- 
matic line numbering and the like. 

When you're writing ML pro- 
grams, you'll be spending a lot of 
time in the editor, so it's important 
to find one that you feel comfort- 
able with. Some programmers pre- 
fer an editor that’s like a word 
processor, while others lean to as- 





semblers that let you write with the 
built-in BASIC editor. 


he source code for an ML pro- & 


gram is made up of mnemonics, 
English-like abbreviations for ML 


instructions, On eight-bit Commo- § 


dore machines, including the VIC, 


64, Plus/4, 16, and 128, all mne- } 


monics are three letters (an excep- 
tion is CP/M mode on the 128; for 
more about this, see “Programming 
the Z80,” elsewhere in this issue). 


The three-letter abbreviation \\\ 


for “LoaD the Accumulator with a 
number” is LDA, In source code, 
for example, the line LDA #0 


means load the number 0 into the } 


accumulator, a register inside the 


main chip. When the file is assem- | 


bled, the source code instruction 
LDA #0 is turned into the object 
code (numbers) 169 and 0. The pr‘ 
mary task of an assembler is this 
translation from mnemonics to 
numbers. 





A disk-based assembler re- © 


quires the source code to be stored 
on disk, When it comes time to as- 
semble, you save the file and tell 
the assembler to start creating the 
object code from the source code on 
disk. RAM-based assemblers, (which 
almost always have a disk option as 
well), read through the source code 
in memory. RAM-based assemblers 
are much faster than disk-based as- 
semblers, which are hampered by 
Commodore's slow serial 
communications. 

Depending on your instruc- 


tions to the assembler, the object ~ 


code (the executable ML program) 
can be sent to a disk file or to mem- 


ory. When a program is assembled — 


to disk, you have to load the pro- 
gram before testing it. If the assem- 
bler places the object code directly 
in memory, you can SYS to it im- 
mediately after assembly. 
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a i BASIC, GOTO and GOSUB re- 

quire a line number reference— 
GOTO 500, for example. The corre- 
sponding ML instructions jump 
(MP) and jump to subroutine (JSR) 
are followed by memory addresses, 
which serve the same function as 
line numbers in a BASIC program. 
But in a source code file, the current 
memory location (also known as 
the program counter) is not usually 
evident. You may have a general 
subroutine for reading the joystick, 
but if you don’t know the exact 
starting address, you can’t JSR to it 
in the program. 

Assemblers solve this problem 
by allowing labels within your 
= source code. You place the label at 
» the beginning of a subroutine, and 
S elsewhere in the program you can 
‘ call it by name. You might label the 
S joystick routine something like 
READJOY and then JSR READJOY 
when you need to use it. Labels are 
also used extensively within loops 

and branches. 
. Equates are another sort of la- 
~ bel. At the start of the program, you 
: = can give names to important mem- 
SSS ~ ory locations, so you can use a 
‘ © name instead of a number. The 
~ screen background color on the 64 
is stored in 53281, which could be 
called BACKGROUND. To modify 

the screen color, you would store a 

value into BACKGROUND. When 

the assembler got to that line, it 

~ would know that BACKGROUND 

stands for location 53281. 

Assemblers that allow labels 

and equates are usually advertised 

- as “two-pass” or “three-pass’”” or 

“Jabel-based.’’ In the first pass 

through the source file, the assem- 

bler sets up a list of labels and the 

equivalent memory locations or 

values. During the final pass, the 

file is assembled and the numbers 
are substituted for the labels. 
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he 128 and Plus/4 include the 

MONITOR command, which 
enables the built-in machine lan- 
guage monitor. Although the 64 
does not come with a monitor, pro- 
grams like Micromon and Supermon 
are widely available. 

Monitors generally have a sim- 
ple assembler, which is suitable for 
writing short routines, but lacking 
many features found in a full- 
fledged assembler. Simple assem- 
blers don’t support labels, for one 
thing, leaving it up to the program- 
mer to calculate the addresses 
where subroutines start and end. 
Another shortcoming is that it’s 
often difficult to insert new lines or 
make corrections; if an assembler/ 
editor is like a word processor, then 
a monitor is like a typewriter—to 
add a sentence may require retyp- 
ing the whole page. 

The commands for disassem- 
bly and memory display make ML 
monitors useful for debugging, 
though, so some assemblers for the 
64 include a monitor to complement 
the other programs in the package. 


A“ assembler without frills 
should include at least the fol- 
lowing features: 


+ A way to type, save, and load 
source files, whether it’s a separate 
editor or the built-in BASIC editor. 

+ Assembly from disk or mem- 
ory, with object files written to disk 
or memory. 

+ Labels and equates. 

+ Error-checking, to flag mis- 
spelled labels, duplicate labels, and 
mistakes of syntax. 


In addition, many assemblers 
offer additional features like macro- 
instructions—usually called macros 
for short. A macro is essentially a 
fill-in-the-blanks mini-program. A 


DIGITAL SOUND SAMPLING 


NOW FOR YOUR COMMODORE 64/128 









COMPLETE 
SAMPLER 64 
SYSTEM 
ONLY 
$89.95 


READY TO USE 
INCLUDES 
MICROPHONE 
Record any sound into memory and replay it 
instantly over several octaves, ascending or 
descending scale, echo, reverb, endless looping, 
etc. Many professional and instructional uses 

and fun for hobbyists. 


Sample editing capabilities 


ll 8 bit ADC and DAC conversion 

Powerful sequencer with real time input 

ive effects menu with real time echo, reverb, 
digital delay, etc. 

© Line and Mic input, line output and feedback 
control 


DIGITAL DRUM BONUS! 


Get the COM-DRUM Digital Drum Software for 
only $14.95 (Reg. $29.95) when purchased with 
the Sampler 64, 


© Turns Sampler 64 into a digital drum machine 

* Real time and step sequencer 

© Polyphonic sound 

* Includes Digitally Recorded Drumkit Samples 
and pre-programmed rhythms to get you 

started 


SEND CHECK OR MONEY ORDER TODAY TO: 
MICRO ARTS PRODUCTS 
P.O, Box 2522, Dept. CG 
Philadelphia, PA 19147 
(218) 336-1199 
PA residents 
id Accepted. 


Commodore 
Service 


3-5 Day 
Turn Around 


(subject to parts availability) 


C-64 Repair .....$55°° 
1541 Alignment .$35°° 
1541 Repair .....$75°° 
Other Computers . .$CALL 


Parts & Return Shipping 
Included. 
Parts & Power Supplies 
Also Available 


To save €.0.D. charges — 
send Unit & Power Supply 
with check or M.O. 
Second Source Engineering 
9901 Horn Rd., Ste. B 
Sacramento, CA 95827 
(916) 364-5134 





























G c 
PS 








You wouldn't settle 
for half the screen. 
Don’t settle for half the sound! 
INTRODUCING 


THE 


“The sound 
is incredible!” 


Greg Rohlfing, Portland, Oregon 


“My favorite peripheral!” 


Lisa Rodgers, Tampa, Florida 


“An outstanding addition to my system!” 
Jett Paul, Ontario, Canada 
THE ULTIMATE SOUND PERIPHERAL 


Highly-sophisticated, with crossover frequencies designed specifically for the 
COMMODORE and MACINTOSH 


There's no other peripheral like it! The 
ULTRAVOX Sound System" adds an ex- 
citing new dimension to all your game 
and music programs by generating in- 
comparable stereo sound from your 
Commodore 64, 128 (64 or 128 mode), 16, 
or +4, or from your Macintosh computer. 
A built-in amp powers your speakers di- 
rectly, or plug the low level outputs right 
into your home stereo. And with the 
headphone jack you can even enjoy your 
full-stereo sound in private. 


‘all stereo separation. 

© 100% compatible with all software. 

© Easy to use, no software required. 

© Sets up in seconds, no soldering. 

© Low level outputs compatible with your 
stereo. 

© Direct speaker outputs. 

© Headphone jack included. 

© Full volume control, 

100% external hardware. 

© Power supply and complete operations 

manual included. 


COMPLETE READY-T0-GO 69 9 5 plus $4.00 shipping insurance 
SYSTEM ONLY . (For COD orders add an additional $4.00.) 


VISA, Mastercard, C.0.D, 


k=l CALL NOW (503) 254- 


855 Sa 


OR SEND CHECK OR MONEY ORDER TO 


PRECISION PERIPHERALS 
AND SOFTWARE 
P.0. Box 20395 Portland, Oregon 97220 


All orders shipped within 24 hours. Dealer inquiries welcome. 





macro that opens a sequential file 
for reading, for example, might call 
several ROM routines and leave a 
blank for the filename. Within your 
source code, you would provide the 
name of the OPEN macro and tell it 
the name of the file to be opened for 
reading. When the assembler as- 
sembled that line, it would find the 
macro in the library and insert as 
many instructions as necessary in 
the object code, plus it would fill in 
the name of the sequential file you 
wanted to open for reading. Mac- 
ros, however, are often rather cum- 
bersome to use; the complexities of 
passing parameters to them can 
make them more trouble than 
they‘re worth. 

Most assemblers allow you to 
insert comments in the source file. 
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These notes to yourself are like 
REM statements in BASIC, Some 
assemblers offer conditional assem- 
bly, which is helpful if you’re writ- 
ing for several different systems, a 
64 and a 128, for example. Like 
macros, however, conditional as- 
sembly is an additional level of 
complexity (and thus an additional 
potential source of bugs). Writing 
dual-purpose source code is, many 
programmers think, of dubious 
value. 

Some also include utility pro- 
grams. An unassembler, for example, 
reads an object file and turns it into 
source code which can be loaded, 
edited, and re-assembled. You may 
also find a disk disassembler, which 
reads a machine language file di- 
rectly from disk and lists it out as 





\ 


=f 
1 

2210 > 
SS on (0) 
WS < 





mnemonics. Occasionally, an as- 
sembler package will include the 
source code for the assembler itself. 
This is valuable because you can 
study the program (if you're just 
learning ML) or change the pro- 
gram, adding new features (if 
you're beyond the beginner's stage). 

One final note: In many cases, 
source files are not compatible be- 
tween different assemblers. If you 
plan to trade source code with a 
friend, it would be a good idea to 
use the same assembler, This is also 
true if you're studying ML ina class 
sponsored by a college or a user 
group. 

Following is a list of commer- 
cial assemblers for the Commodore 
64 and 128. For more information, 
contact the manufacturer. @ 








PROGRAMMING THE 


ws 





Morris Simon, 


If you've already 
explored BASIC and 
6502 machine 
language, the 
Commodore 128 offers 
a brand new and 
fascinating world of 
programming— 

the Z80 chip. 





Are you taking full advantage of the powerful Z80 processor in your Com- 
modore 128? I don’t mean just using CP/M mode to run the thousands of 
free programs in public domain libraries, although that’s a good start. I 
mean writing your own applications in Z80 assembly language. 

Why? For the same reasons that many professional programmers pre- 
fer machine language (or assembly language) over high level languages 
like BASIC: speed, efficiency, maximum control, and just plain fun. 

With a little reading and a little money, you can convert your 128 into 
an excellent Z80 CP/M development system. All you need to start is an 
assembler to assemble your source code into machine language; a loader 
to put your program where it'll be running in your RAM; and a debug- 
ger—since machine language programs don’t always run the first time. 
Note that I didn’t mention an editor: Most word processors will do just 
fine. Except for the Commodore 128, the rest of the system can cost less 
than $100, 

You have to start learning one of two kinds of assembly language: 
either Intel’s 8080 or Zilog’s Z80 instruction set. Which one? By the time 
you finish this article, you'll be able to make this decision for yourself. 


The Transition From 6502 Machine Language 
If you've ever written a machine language (ML) program for the 64 or 128, 
learning Z80 machine language shouldn't be very difficult. The same ML 
operations found in the 6502 family of chips are available in the Z80 (plus 
a few more), but the Z80 uses different mnemonics. If you know what the 
6502’s LDA #5 means, you'll probably recognize the Z80 instruction LD 
A,5. The two instructions are spelled a little differently, but they do the 
same thing; they put the number 5 into the accumulator. 

There are a few differences of which you should be aware before start- 
ing, especially if you're experienced in 6502 ML. First, the Z80 has more 
registers than the 6502's A, X, and Y. The Intel instructions support seven 
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registers: B, C, D, E, H, L, and A. These are sometimes paired up for use as 
pointers to memory: BC, DE, and HL (the memory location pointed to by 
HL is called the M register, even though it’s in RAM and isn’t a true regis- 
ter). The Zilog commands include other registers, IX and IY for example. 
All of these additional registers serve a purpose—Indirect-Y addressing, 
which is widely used in 6502 programs, is not directly supported on the 
Z80, Instead of putting an address in a zero-page address and loading the 
accumulator through the pointer there, as you would in a 6502 program, 
you put the address into a register pair (HL, for example). The register pair 
serves the same purpose on the Z80 as zero-page indirect addressing does 
on the 6502. 

There’s a minor difference in hexadecimal notation, as well. When 
writing Z80 ML, it’s more common to add the letter H after a hex number 
instead of putting a dollar sign in front of it. You’d substitute 400H for 
$0400, for example. 

In Commodore 6502 ML, the Kernal routines are important; they pro- 
vide common entry points, regardless of which computer you own, for es- 
sential routines that open files, get a character, print to the screen, close 
files, and so on. CP/M uses the same idea in its Basic Disk Operating Sys- 
tem (BDOS) and Basic Input/Output System (BIOS) routines. The BIOS 
call for getting a character from the keyboard works the same on a 128, 
Kaypro, Osborne, or other CP/M computer. The machines are different on 
the hardware level, but from a software standpoint, the operating system 
looks the same. If you plan to do Z80 program, it pays to learn how the 
BDOS and BIOS routines work. 


Intel Mnemonics 
The Intel instruction set was designed for the Z80’s precursor, the 8080. In 
the early days of microcomputers, most programmers wrote in 8080 as- 
sembly language. Digital Research’s CP/M and most of the earlier CP/M 
software is written in 8080 code. 

Intel (8080) mnemonics can be confusing when you're first learning 
them. For example, MOV means Load, as in: 
MOV A,C ;LOAD REGISTER A WITH BYTE IN REGISTER C 


(In machine language, anything after a semicolon is a comment to be 
read and will not be processed by an assembler.) 

In the example above, it might appear as if the byte in register C has 
been shifted to register A, but actually it’s only been copied to register A 
(the accumulator). Other instruction sets, including the Zilog, use LD (for 
Load) for this operation. Note that MOV and LD are just different ways of 
saying the same thing; when the program is assembled, the object code— 
the numbers in memory—will be the same. 


Zilog Mnemonics 

The Zilog instruction set reflects the greater power of the Z80 CPU, which 
has many more 16-bit registers and register pairs, and facilities for direct 
input/ouput operations. The major improvements over the 8080 instruc- 
tion set include: direct loading of all 16-bit registers and pairs, instructions 
for two new 16-bit index registers (IX and IY), instructions to switch sets of 
registers, direct input and output addressing, block shift and block transfer 
instructions, enhanced jump instructions, and a more comprehensible sys- 
tem of mnemonics. 

Obviously, Zilog’s instruction set was designed to take advantage of 
all the Z80 improvements over its cousin, the pioneer 8080. In fact, if you 
write programs using Z80 mnemonics, you're accessing about as much 
power as you can from any eight-bit processor. So why would anyone go 
to the trouble of learning 8080 code when they could master the Z80 in- 
struction set just as easily? Let’s look into that. 

The choice between Intel and Zilog instruction sets depends on the as- 
sembler you're using to convert your source code into machine language. 
Digital Research (the people who invented CP/M) decided to stick with 
the Intel 8080 instruction set for all their software, including their work- 
horse assemblers, which Commodore packages for the 64 (ASM) and the 
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128 (MAC & RMAC). 

The Z80 commands are a su- 
perset of 8080 commands, in the 
same way that Commodore 128 
BASIC (version 7.0) is a superset of 
the Commodore 64’s BASIC 2.0. 
The Z80 can do everything the 
8080 can do, plus it has many addi- 
tional commands and more registers. 

Even though the 128’s CP/M 
assembler supports the Intel mne- 
monics, there’s an easy way to use 
the Zilog instruction set if you want 
to. 


Macros 

The Zilog set includes a very useful 
single instruction, DJNZ address, 
which is used to control loops. 
(DJNZ is Decrement and Jump if 
Not Zero.) To use it, simply load 
register B with the number of times 
you want a loop to occur, follow the 
load instruction with your loop sub- 
routine, and end it with DJNZ and 
the address of the beginning of the 
loop. The program automatically 
decreases the value in register B 
and repeats the loop until B equals 
zero. 

If you want to emulate DJNZ 
with Intel instructions, you have to 
list both components of DJNZ sepa- 
rately, first by DEC B, which de- 
creases the counter by one, and 
then by JNZ address, which per- 
forms the routine as long as B does 
not equal zero. You might then de- 
clare the combination “DEC B” + 
“JNZ loop address” as an external 
macro, 

Not all Z80 instructions can be 
emulated by Intel mnemonics, how- 
ever, even with complex Intel mac- 
ros. That’s why you'll find a file 
called Z80.LIB on the one of the 
CP/M source disks from Commo- 
dore (these are the disks you re- 
ceive when you mail the card in the 
CP/M section of the System Guide; 
there’s also a very detailed 500+ 
page CP/M manual included with 
the disks). 

To use Z80.LIB, put this line at 
the beginning of your source file: 
MACLIB Z80 

This tells the assembler you 
want to include the macro library 
file called Z80. With this line at the 
beginning of your program, you can 





use any or all of the Z80 command 
set. In a nutshell, it provides a look- 
up table that matches the Z80 mne- 
monics with the appropriate 
opcodes, It doesn’t just emulate 
DJNZ by splitting it into DEC and 
JNZ, for example, it actually assem- 
bles the DJNZ instruction into the 
corresponding 8080-style ML 
instruction. 


CP/M And Assembly 
Language 

CP/M is an operating system rather 
than a language. The relationship 
between CP/M and machine lan- 
guage is very simple. From your 
program, you make calls—or 
jumps—to constant locations in 
CP/M memory any time you need 
the operating system to do some- 
thing. CP/M has further instruc- 
tions stored at those locations and 
will return control to your program 
when the job (whatever it is) is 
done. 

For example, location 0000H 
contains a jump instruction to the 
warm boot routine in CP/M’s 
BIOS. Therefore, anytime you wish 
to exit a program you could include 
JP 0000H (or JP 0 since decimal 0 = 
0H) and the program would exit to 
a warm boot at that point. This is 
the way to finish up a program and 
send the user back the the CP/M 
A> prompt. 

Most CP/M calls are made to 
location 0005H, where another 
jump instruction passes control of 
the program to CP/M’s BDOS. 
Before you CALL BDOS, your pro- 
gram needs to give CP/M a little 
more information, particularly the 
number of the service call you wish 
to make, You put this number in 
register C, For example, CP/M ser- 
vice call number 9 is a print string 
function which prints to the screen 
an ASCII string ending in a dollar 
sign ($). BDOS must see the num- 
ber 9 in register C and the string’s 
starting address in register pair DE. 
At another place in your program, 
you'll define the string to be printed 
with a DB (Data Byte) instruction 
(and end it with a $). For example: 





BDOS EQU0005H ;THIS EQUATE WILL OCCUR EARLY IN PROGRAM 


;OTHER CODE 


LD G9 ;CP/M FUNCTION #9 NOW IN REG C 
LD DE,MSG_ ;POINT REGS DE TO ADDRESS OF MESSAGE 
CALL BDOS_ ;“BDOS” WAS DEFINED EARLIER AS “0005H” 


ene jOTHER CODE 

DB “This is the message to be printed.$” 
Notice how the entries BDOS and MSG are defined in the leftmost la- 
bel column. A good assembly program will clearly separate labels, instruc- 
tions, operands, and comments: 
LABEL INSTR OPERAND ;COMMENT 


It's common practice among Z80 programmers to place comments on 
nearly every line of source code. 

In the 128 version of CP/M (CP/M 3.0, also called CP/M-Plus), there 
are more than 60 specialized CP/M service calls you can use in your as- 
sembly language programs. To get the most out of your machine, you 
should begin practicing each of the service calls in sample programs until 
you understand what it does. 


MSG 


Z80 Programming Techniques 
In the examples which follow, I’ve used true Zilog mnemonics simply be- 
cause they take less space and are easier to understand. 


Loading And Storing Registers 

The Z80 allows you to load practically any register from memory, from an- 
other register or by immediate loading of a value. The basic form of a typi- 
cal load instruction is 

LD destination, source 


The destination may be either a register or a memory location, and source 
may be a register, memory location, or a value. For example, 

LD A,C ;LOAD ACCUMULATOR FROM C 

Values can be loaded directly into registers: 

LD C6 ;PUT VALUE 6 DECIMAL IN REGISTER C 

or indirectly from addresses in RAM: 

LD A({5973H) —_ ;LOAD A WITH BYTE FROM ADDRESS 5973 HEX 


or indirectly from addresses in registers: 
LD A{BC) _—;LOAD A WITH BYTE FROM ADDRESS IN BC 


Note that a value in parentheses is an address, while one without pa- 
rentheses is a numeral. Remember that if you want a hex number (or ad- 
dress), you must add the letter H. Z80 assemblers default to decimal 
numbers, 

Storage of data is done by the reverse procedure: 

LD (address), register 


The stack pointer (SP) is a 16-bit value in the Z80, which means you 
can point it to any location in memory. This is quite useful in situations 
where you need to clear out a section of memory. Just set the stack pointer 
and PUSH a series of zeros onto the stack. If you wanted to save the stack 
pointer first, you'd use this instruction: 

LD (0A71H)SP_— ;LOAD STACK POINTER (A 16-BIT ADDRESS) 
;INTO THE TWO-BYTE LOCATION STARTING AT 
;A71 HEX; THE LOW BYTE WILL BE STORED 
;FIRST, THEN HIGH BYTE AT A72 HEX 

A common application of the Z80 loading operations is to initialize 
RAM locations with certain values. For example, let's store a byte of data 
(BYTE) at location 500H: 

LD A,BYTE ;PUT DATA BYTE INTO ACCUMULATOR 
LD (0500H),A ;COPY BYTE IN REGISTER A TO 500 HEX 

The same principle can be used to initialize word-length values by 
sending them through the HL register pair, which functions almost as a 
16-bit accumulator: 
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LD HL,WORD 
LD (0500H),HL 


;PUT DATA WORD INTO HL PAIR 
;COPY L INTO 500H & H INTO 501H 


Arithmetic And Logic 

The Z80 allows greater flexibility in arithmetic and logical operations than 
most other eight-bit CPU's. For a simple example, let’s add a constant, 
NUMBER, to whatever variable happens to be in a given location, (VAR), 
and then change the variable: 


LD A,(VAR) ;COPY VARIABLE INTO ACCUMULATOR 
ADD A,NUMBER ;DO THE ADDITION 
LD (VAR),A ;AND CHANGE THE VARIABLE AT LOCATION VAR 


Further examples of such routines would take up too much space in 
this article, but there are good mathematical macros in most Z80 libraries 
for anything you want to do. The Z80’s double (16-bit) registers make dou- 
ble-precision calculations a breeze. 


Bit Manipulation 

Most eight-bit computers have only one way to manipulate individual 
bits—by using logical instructions such as AND and OR to mask or set por- 
tions of bytes. The Z80 lets you use those, if you wish, but also provides 
three special bit manipulation instructions: SET, RES (for reset), and BIT 
(to test a bit), Each of these codes works the same way: 


SET nr SET BIT n OF REGISTER r 
RES nr ;CLEAR (RESET) BIT n OF REGISTER r 
BIT nr ;TEST BIT n OF REGISTER r—SET THE ZERO 


;FLAG IF n=0 OR CLEAR IT IF n=1 


Shift Operations 
For those of you who like binary operations, the Z80 allows you to per- 
form shift and rotate functions on any register or memory location. 


Branching Instructions 

The Z80's amazing repertoire of relative and absolute jumps allows condi- 
tional and unconditional branching by testing single bits, individual flags, 
and value comparisons. You can test a value either in a register or in mem- 
ory for sign, carry, zero, or parity/overflow and then branch in ways 
which resemble GOTO, IF, and THEN instructions in BASIC. Some com- 
mon examples: 


cP LIMIT ;IS ACCUMULATOR GREATER THAN LIMIT? 
JR NC,NEXT jNO CARRY FLAG SO GOTO NEXT 

AND A ;SET ALL FLAGS TO TEST ACCUMULATOR 
je P,NEXT jIF ACCUMULATOR IS POSITIVE GOTO NEXT 
cP KEY jELSE SEE IF A= KEY 

JR Z,LAST ;YES, A=KEY, SO GOTO LAST 

NEXT 

LAST 


Here's something to watch out for if you're a 6502 programmer. With 
the 6502, you set the carry (SEC) before a subtract with carry (SBC) opera- 
tion. If the carry is still set after the subtraction, it means the first number 
was larger than the second. The Z80 is just the opposite: You clear the car- 
ry before adding or subtracting. This also affects comparisons. In the ex- 
ample above, the CP instruction compares the Accumulator to the number 
called LIMIT. If there’s no carry, then the Accumulator was larger than 
LIMIT. (On the 6502, the carry would be set if LIMIT was smaller.) 


Loops 
Looping with subroutines is facilitated in the Z80 by the DJNZ instruction 
mentioned earlier. It’s very easy to combine registers B and C to use a 16- 
bit loop for longer executions, or to design nested loops within loops using 
DJNZ. 
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Books — 
8080/Z80 Assembly. Language 
Alan Miller; John Wiley & Sons, 
(A good: Jtroductions & Bolles i 
sets) 

Dr. Dobb's 280. Toolbox by Davi E. 
Cortesi; M&T Publishing, 1985, (Us 
Intel instruction set; available on dis) 


Soul of CP/M by Mitchell Waite an 
Robert Lafore; Howard Sams & Co, 
1983. (A classic on the Natal instruction 
set.) 

280 Assembly Language ARON 
by Lance A. Leventhal ‘and Winthrop. 
Saville; Osborne /McGraw-Hill, 1983. 
(My favorite on Zilog mnemonics, 



















Software 


Commodore 128 development packag 
(MAC, RMAC, SID, etc.); from Conim 
dore Business Machines, 1200 Wil 
Dr. West Chester, PA SES 


Echelon development sys 
(2-Tools); for either Intel or Zilo, 
grams; from Echelon, Inc,, 885 N, 
Antonio Ra., Los Altos, CA 9402 


Microsoft development sees (Mat 
180, etc.); for either Intel or Zilog. 
programs; from. Microsoft, Inc., 1071 

Northrup Way, Bellevue, WA 9800: 


SYSLIB3 by Richard Con an 

ion, the best collection of. 280 routines, 

Available in either Intel or Zilog mne- 

monics from Echelon. oron some, BURR 
boai rds.) . . 























Any GAZETTE readers wanting, 
further information on Z80 assemb 
language programming, are 
come to write to me at 118 Brot 
haven, Tuscaloosa AL 35405. 

a self-addressed, stamped env 
for a quick reply. 


Handling Arrays, Tables, And Indexing 

The two extra index registers plus easier access to all register pairs allow 
you to handle both indexed and unindexed arrays neatly and quickly. One 
common style of array handling involves pointing HL to a memory loca- 
tion, and then loading byte after byte from that location into DE for further 
processing. If desired, register B can be used as a counter: 


LD HL(START ) ;POINT HL TO START OF ARRAY 

LD B10 ;SET B AS A COUNTER FOR TEN REPETITIONS 
MORE LD E,(HL) ;LOW BYTE GOES INTO E 

INC HL jINCREMENT HL BY ONE, POINT TO NEXT BYTE 
LD DAHL) jHIGH BYTE INTO DE 

INC HL ;POINT TO NEXT ELEMENT 

CALL LOUT iTHIS MIGHT BE A ROUTINE TO OUTPUT DE 
DJNZ MORE j;RETURN FROM ROUTINE, DECREASE COUNTER, 


jAND DO IT AGAIN UNTIL B=0 


With indexing, a register is loaded with an offset value which is then 
added to the base of the array each time the loop is repeated. This example 
loads the accumulator with every eighth element in an array until 20 en- 
tries have been checked: 


LD HL(START) ;POINT HL TO START OF ARRAY 
LD B,20 ;COUNTER SET FOR 20 ENTRIES 
LD DES jOFFSET = 8 DECIMAL 

MORE ADD HL,DE ;OFFSET ADDED TO BASE, STORED IN HL 
LD AHL) ;GET 8TH ELEMENT INTO ACCUMULATOR 
CALL LOUT ;AND DO SOMETHING TO IT 
DJNZ MORE 7RETURN & DO IT ALL AGAIN UNTIL B=0 


Block Move (LDIR) And Compare (CPIR) 

These categories of instructions are two of the more powerful enhance- 
ments of the Z80 over the 8080. Logically, both procedures are very simple 
and work the same way. You put the size of a block (in bytes) in register 
pair BC, then point to the beginning of the block with HL. If you're moving 
the block, you put the destination starting address in register pair DE: 


LD BC,128 jSET COUNTER FOR 128 BYTES 

LD DE,NEWADD _ ;DESTINATION TO START AT NEWADD. 
LD HLOLDADD = ;SOURCE STARTS AT OLDADD 

LDIR MOVE IT! 


If all you want to do is scan a block of data for a particular byte, you 
can omit the destination address, since the comparison will be done in the 
accumulator: 


LD BC,128 ;SET COUNTER FOR 128 BYTES 

LD HL,START iSTARTING ADDRESS OF BLOCK IN HL 

LD AAH ;PUT CONTROL-Z IN ACCUMULATOR 

CPIR ;COMPARE HL WITH A AND INCREMENT HL 


;UNTIL EITHER °Z IS FOUND OR BC=0 


Enhanced Input And Output Instructions 
With the Z80, you can input or output data from either your registers or 
RAM directly to and from your computer's various ports. And you can do 
this by blocks, The relevant instructions are IN, OUT, INI, IND, OUTI, 
OUTD, OTIR, and OTDR. They're easy to use, simply by specifying the 
port in question: 
IN A,28H)  ;GET A BYTE FROM PORT 28 HEX 
OUT (C),B — ;OUTPUT BYTE IN B VIA PORT NUMBER IN C 

The block transfers (INIR, INID, OTIR, OTDR) work very much like 
the block move and compare instructions described in the last section, re- 
serving register C for the port address and HL for a memory address, 


Interrupt Processing 
Fast interrupts on the Z80 use the RST instruction plus the destination ad- 
dress. For example: 


RST 38H. i TRANSFERS CONTROL TO ADDRESS 38 HEX 





There will usually be a perma- 
nent jump instruction at the desti- 
nation which then sends control to 
a special routine, such as a graphics 
driver. You can also store an elabo- 
rate subprogram in the alternate 
register set and shift to it with an 
RST jump. 


Your Choice 

Have you decided which instruc- 
tion set and assembler you want to 
use in your 128? If you've already 
bought the optional Commodore 
development package, which in- 
cludes MAC, RMAC (for Relocat- 
able code MACRo assembler), the 
SID debugger, LINK loader, and 
LIB library manager, then you've 
gota choice. If you include the 
Z80.LIB macro file, you can use 
either (or both) instruction sets. 

Two other fine assembler 
packages are Echelon’s ZAS-ZLINK 
and Microsoft’s M80-L80 systems. 
Both are compatible with the Intel- 
based ASM-MAC family, and ZAS 
can even assemble code for the Hi- 
tachi HD64180, a new eight-bit 
CPU which is upward compatible 
with the Z80. 

Regardless of your assembler 
selection, you should build up a 
collection of good Z80 subroutines. 
The best Z80 library I know of is 
SYSLIB3, a public domain version 
of which may be on a CP/M bulle- 
tin board near you. Echelon distrib- 
utes SYSLIB3 in a set with other 
libraries and manuals for Z80 de- 
velopment systems for under $100. 

You really can’t appreciate the 
speed and efficiency of your Z80 
until you start speaking its own lan- 
guage. Until then, you'll just have 
to be content with running thou- 
sands of excellent programs written 
by other people. Learning Z80 as- 
sembly language will give you even 
greater computing power and will 
allow you to do exactly what you 
want to do with your machine. To 
make it easier, refer to the list of 
books and software on page 40. 
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User Group Update 


When writing to a user group for information, please remember to 
enclose a self-addressed envelope with postage that is appropriate for 
the country to which you’re writing. 


Send typed additions, corrections, and deletions for this list to: 


COMPUTE! Publications 

P.O, Box 5406 

Greensboro, NC 27403 

Attn: Commodore User Groups 


User Group Notes 


The Midwest C-64 Users Group has changed its mailing address to 
P.O, Box 9311, Highland, IN 46322, 

The C64/128 User Group of Koeln, West Germany has 
disbanded. 

The Platte Valley Commodore Users Group has changed its name 
and address to Platte Computer Users Group (PVCUG), 1685 Bonanza, 
Gering, NE 69341, 

The CIVIC64 Commodore Users Group of Oxnard and Camarillo, 
CA has changed its mailing address to CIVIC64, P.O. Box 2442, Ox- 
nard, CA 93034-2442. 

The Westinghouse BWI Commodore Users Group has changed its 
name and address to Westinghouse Commodore Users Group, P.O. Box 
8756, Baltimore, MD 21240. 

Antelope Valley Commodore User Group (AVCUG) has a new 
address: P.O, Box 4436, Lancaster, CA 93539. 

The Commodore Club of Mobile is now the Amiga/Commodore 
Club of Mobile. The address remains: 3868-H Rue Maison, Mobile, AL 
36608. 

The Arizona VIC & 64 Users Group has changed its name and 
address. It’s now the Arizona Commodore Users Group, P.O. Box 
27201, Tempe, AZ 85282. 

Power Surge Users Group also has a new address: c/o Orange- 
wood Academy, 13732 Clinton Ave., Garden Grove, CA 92643, 

The Colorado Commodore Computer Club’s new address is 
11855 Adams St., Northglenn, CO 80233. 

The Naugatuck Valley Commodore User Group has a new mail- 
ing address: P.O, Box 622, Waterbury, CT 06720. 

The Redwood Falls Area Computer Exchange can now be reached 
at 717 E. Wyoming St., Redwood Falls, MN 56283. 

The Heartland Users Group’s new address is P.O, Box 443, Cape 
Girardeau, MO 63701. 

The Tri-Cities Commodore Club has a new address: 802 Kimrod 
Dr., Johnson City, TN 37601. 

The Old Hickory Commodore Users Group can now be reached 
at 542 Lambuth Blvd., Jackson, TN 38301. 

Billy Schultz of McKinney, Texas is interested in starting a Com- 
modore user group. He can be reached at 2808 Colonial Ct., McKinney, 
TX 75069. 
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New Listings 


ALABAMA 
The Byte Bunch, 318 Perryman St., Evergreen, AL 
36401 





Commodore User Group, Rt. 2, Box 105, Smiths, 
AL 36877 


ALASKA 


Mat Su Commodore 64 Club Inc., Box 1208, 
Palmer, AK 99645 


ARIZONA 


Phoenix Arizona Commodore Club, P.O. Box 
34905, Phoenix, AZ 85067 


ARKANSAS 


Commodore Information Association, P.O, Box 
1755, Conway, AR 72032 


COVUTONIE 

C.P,U, Commodore Users Group, 27202 
Corcubion, Mission Viejo, CA 92692 

Point Mugu Users Association, P.O. Box 42360, 
Point Mugu, CA 93042 

Commodore Systems User Network, P.O, Box 
261, Lompoc, CA 93438 


FLORIDA 

Welaka Commodore Users Group, P.O. Box 909, 
Welaka, FL 32093 

Northwest Florida Commodore User Group, 
P.O. Box 15565, Pensacola, FL 32514 

Fellsmere’s Club Compu-Mania, 2149 Watkins 
Rd. S.E., Palm Bay, FL 32907 


ILLINOIS 


The Software Link, 763 Stewart Ave., Elgin, IL 
60120 





‘The 64 Smorgasboard, 51 Thornhill Dr, 
IL 61832 


INDIANA 

Kosciusko Commodore User's Group, 1721 S. 
Latta St., Warsaw, IN 46580 

Richmond Area Commodore Users Group, P.O. 
Box 1332, Richmond, IN 47375 


Plymouth County Commodore Users Group, 300 
Third Ave. SE, Lemars, [A 51031 


AS 


Danville, 


KAN 





Newton Area Commodore Club, Larry Wilson, 
Newton, KS 67114 





Commodore Users Group of Cape Cod, P.O. Box 
1490, Cotuit, MA 02635 

Massachusetts Electronic Modem Operators 
(MEMO), P.O. Box 3336, Fall River, MA 02722- 
3336 


MICHIGAN 

Downriver Commodore Group, P.O. Box 1277, 
Southgate, MI 48195 

Washtenaw Commodore Users Group, 4490 
Oakengates Dr,, Ypsilanti, MI 48197 

Central Michigan Commodore Users Group, 
5600 N, Bollinger Rd,, Vestaburg, MI 48891 








Elk Rapids Commodore Users Club, 6697 E. 
Harbor Dr., Elk Rapids, MI 49629 

Northern Michigan Commodore Club, P.O, Box 
3066, Gaylord, MI 49735 

U. P, Computer Users Group, P.O. Box 508, 
Ishpeming, MI 49849 


MINNESOTA 


Commodore User Learning Exchange, 718 N. 
First Ave. E,, Duluth, MN 55805 


MISSOURI 


Forefront C-128 National Users Group, P.O. Box 
21836, St. Louis, MO 63109 


NEBRASKA 


International Commodore Language Interest 
Group, 1812 North 1, Fremont, NE 68025 


NEV MPSHIRE 


Commodore Users Group, R.D. 9, Box 307, 
Concord, NH 03301 


NEW YORK 


Commodore Computer Game Pros of NY, 4263 
Carpenter Ave., Bronx, NY 10466 

For Your Computer Only, 35 Belleview Ave., 
Ossining, NY 10562 

Commodore Long Island Club, 2949 Roxbury Ct., 
Oceanside, NY 11572 

Frontier Commodore Users, RFD #1, Box 352A, 
Chazy, NY 12921 

The Shadows Commodore 64 Users Group, 10 
Boylston St., Oneonta, NY 13820 


fo) Fite} 


Dayton Area Commodore Users Group, 679 
Murray Hill Drive, Xenia, OH 45385 


OKLAHOMA 

Coweta-Commodore Users Group, Box 8204, 
Coweta, OK 74429 

Osage/Kay Commodore User's Grow 
(ORCUM), 300 Woodbury Ra. Ponca City, OR 
74601 





PENNSYLVANIA 

Susquehanna Valley User Group, RD #5, Box 
145, Danville, PA 17821 

ABC C-64 Chips Commodore Users Group, 3159 
Middletown Rd., Bethlehem, PA 18017 
TENNESSEE 


Cleveland Commodore User Group, 2413 Hick- 
ory Dr. NW, Cleveland, TN 37311 


TEXAS 

Commodore Users Club, 5309 Strickland, The 
Colony, TX 75056 

Klein Commodore Users Group, 7627 Litchfield 
Ln., Spring, TX 77379 


WASHINGTON 


Commodore Bellingham Users Group (CBUG), 
P.O. Box 2756, Bellingham, WA 98227 


WISCONSIN 


Club 84, P.O. Box 72, Caledonia, WI 53108 


Outside the U.S. 


AUSTRALIA 


Cairns Commodore Users Group, P.O. Box 7, 
Earlville, Cairns, Queensland 4870, Australia 


BERMUDA 


Commodore Computer Club of Bermuda, P.O. 
Box HM 2093, Hamilton 5, Bermuda 
UUAVAL 

Brasilian Club of VIC-20, Flavio Joao Piagentini, 


Rua Heitor de Moraes, 856-Pacaembu, Sao 
Paulo, Brasil 01237 


CANADA 

Powell River Commodore User Group 
(P.R.C.U,G.), 5562 Willow St., Powell River, 
B.C., Canada 

Microcom 64, 110 St. Louis St., Rimouski, Quebec 
GSL 5P7 





To Our Readers: 


INDIA 

Commodore Users Group, c/o S. Ram Gopal, 1B, 
19th ‘D’ Main Rd., Rajajinagar First Block, 
Bangalore 560 010, India 


JAPAN 

Zama/Atsugi Commodore Users Group, 500th. 
MI. Gp. Box 45, APO, San Francisco, CA 96343- 
0091 


POLAND 
Stefan Kssecki or Elizbieta Kossecka, 02-757 
Warszawa, ul. Burgaska 3/24/1, Poland 
Andrzej Wiechowski, ul. Lokietka 47/38, 31-279 





Walter Sulimierski, ul. Olimpijska 56, 02-636 
Warsaw, Poland 
SPAIN 

Costa Blanca Computer Club, c/o Ed Kelly, 
Montebello 25, La Nucia-Alicante, Spain 
SWEDEN 

Swedish Esoteric Society Avec Modem, Lars B. 


Lundin, Parkgatan 16 3tr., S-112 30 Stockholm, 
Sweden 


WEST INDIES 


Caribbean Commodore Computer Club, Jim 
Lynch, P.O. Box 318, St. Johns, Antigua, West 
Indies 





COMPUTE! Publications is a part of the ABC Consumer Magazines group of ABC 
Publishing, Inc. and recently we consolidated many of our operations and moved 
our Customer Service Department to the New York ABC headquarters. If you 
have any questions regarding back issues, disk orders, book orders, or how to 
place an order, call toll free 1-800-346-6767. New York residents should call 


212-887-8525, 


If you want to order a subscription to COMPUTE!, COMPUTE!’s GAZETTE, COMPUTE!’s 
GAZETTE DISK, Or the COMPUTE! DISK, Call 1-800-247-5470 or in lowa call 


1-800-532-1272. 


Our Editorial Offices remain in Greensboro, North Carolina. If you wish to submit an 
article for publication, write us at COMPUTE! Publications, Inc., P.O. Box 5406, 


Greensboro, NC 27403. 


We thank you for your interest and continued support of COMPUTE! Publications. 


COMPUTE! Publications, Inc. 


Part of ABC Consumer Magazines, Inc 
(One of the ABC Publishing Companies 
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reviews 


Golden Oldies is a slice of computer his- 
tory on a disk, containing four classic 
computer software games—the first all- 
text computer adventure game, Adven- 
ture; the self-replicating world-within- 
a-world, Life; the original arcade game, 
Pong, and the famous simulated com- 
puter psychiatrist, Eliza, 

It’s only fair to state immediately 
what these programs are not. They in 
no way can be compared with the com- 
puter software available today; in fact, 
as one experienced computer program- 
mer and writer points out, these pro- 
grams represent early, crude attempts 
at programming before programming 
was done well. They also show all of 
the limitations of computer hardware 
just 10 to 15 years ago. Don’t expect the 
advanced graphics and sound features 
and the other bells and whistles you’ve 
come to expect on the Commodore 64 
and 128. 

On the other hand, Golden Oldies is 
a fascinating look at just how far com- 
puter software has come, For anyone 
interested in the roots of personal com- 
puting, these four programs each repre- 
senta distinctly different cornerstone of 
today’s software. Adventure was the 
precursor to all of the computer fantasy 
and adventure games, Eliza has been 
hailed as a program important in the 
early thinking about artificial intelli- 
gence, even though its author viewed it 
as a joke. Life is, in many ways, the 
forerunner of today’s sophisticated 
computer simulation and modeling 
programs. And Pong spawned the en- 
tire arcade computer game industry. 
Though the programs are seriously dat- 
ed by today’s standards, remember that 
each one was a pioneering effort in its 
time. 

These programs are recreated here 
in a form faithful to the original. For ex- 
ample, this is the authentic version of 
Adventure endorsed by its creators, Will 
Crowther and Don Woods, who origi- 
nally developed the game on a main- 
frame computer in the early days of 
“hacking,” or computer programming. 
The version of Pong included on the 
disk is actually a recreation of the origi- 
nal game by Al Alcorn, who first devel- 
oped Pong for Nolan Bushnell’s then- 
fledgling company, Atari. There’s also 
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Golden Oldies, Volume 1 


an alternate version included with a 
few more features, 

The Golden Oldies package is en- 
hanced by its manual, a 42-page book- 
let that engagingly recreates the 
historical context, samples of play, and 
related information. Excerpts from such 
recent books as Tracy Kidder’s Pulitzer 
Prize-winning The Soul of a New Ma- 
chine, Steven Levy's Hackers, Scott 
Cohen's Zap, The Rise and Fall of Atari, 
and William Poundstone’s The Recur- 
sive Universe all help to set the stage as 
you use the programs. 

For those unfamiliar with each of 
the programs, here’s a brief explanation 
of what they're about: 

Adventure is an all-text game in 
which you explore the mysteries of Co- 
lossal Cave, gathering treasure and 
avoiding the many dangers of this sub- 
terranean world. Don’t expect the kind 
of full-sentence interaction you may 
have come to expect from recent text 
adventures. Adventure understands 
‘one- or two-word commands, and only 
the first five letters of each word. Still, 
the game itself is fun, if limited in 
scope. 

Pong (from Ping-Pong) is the origi- 
nal computer table tennis game, in 
which you control an onscreen paddle 
that bounces the ball, a white blip on 
the screen, back and forth. You can play 
against the computer, or two people can 
play against each other. 

Eliza, first developed by computer 
scientist Joseph Weizenbaum to mimic 
Rogerian psychotherapy, has been tak- 
en seriously by many people as an early 
example of artificial intelligence. It’s 
really just a very clever program that 
appears to understand your questions 
and statements, leading you gently 
through an exploration of your feelings. 
Weizenbaum was reportedly quite sur- 
prised when people began calling Eliza 
an example of machine intelligence. He 
meant it more as a joke than a serious 
endeavor. It can be a lot of fun to play 
with, but remember that it’s a game. 
There are other implementations of 
Eliza, some more complete than others. 
This version is supposed to be a faithful 
recreation of Weizenbaum’s original. 

Life is a computer simulation that 
was originally developed by British 





mathematician John Conway, and then 
popularized by science writer Martin 
Gardner in the October 1970 issue of 
Scientific American, The game of Life is 
played on a grid field, where succes- 
sions of small screen symbols—called 
generations of cells—live out their lives 
according to a set of arbitrary physical 
laws. Depending on the rules, the indi- 
vidual cells live and prosper, die and 
make way for new cells, mutate into 
different forms, and so on, It’s a com- 
plete world or universe in microcosm, 
and has fascinated many computer us- 
ers since its introduction on mainframe 
computers (and later on microcomput- 
ers). You really have to experience Life 
to understand it, and once hooked on 
its complexities, you may find it fas- 
cinating. 

Golden Oldies is a trip into the past 
for a look at where personal computing 
started. And despite the limitations of 
the programs, it’s a nostalgic and enter- 
taining journey. 

—Selby Bateman 
Software Country 
9713 Santa Monica Blvd. 
#202 
Beverly Hills, CA 90210 


Electronic Arts (distributors) 
1820 Gateway Dr. 

San Mateo, CA 94404 
$29.95 





RADARBASIC 50K 


RADARBASIC 50K is a handy utility 
program offered on a plug-in cartridge 
for the Commodore 64, It’s a product of 
Radarsoft, a Dutch software company 
that’s fairly new in this country. 

As the title implies, RADARBASIC 
50K gives you 50K (51,199 bytes) of free 
RAM, all of which is available for 
BASIC programs. This is 12K more 
RAM than is normally available with 
the Commodore 64, and there's no con- 
flict with your old BASIC programs. 
They may not take advantage of the ad- 
ditional memory, but they'll all work as 
usual with one minor exception: Since 
the 12K area added to BASIC RAM 
starts at 40960 and extends to 53247 
($A000 and $CFFF in hex), any BASIC 
program that uses this area to PEEK or 
POKE memory, or for a machine lan- 








guage routine, will not work properly. 
It's not necessary to unplug the car- 
tridge if you do have a program that 
uses this area. Merely type in a shifted 
K (for Kill) and press RETURN. The 
computer is reset to its conventional 
status and you can load and run your 
program as usual. 

Perhaps the most interesting thing 
about this program is the commands it 
adds to the standard Commodore oper- 
ating system to easily access disk and 
tape drives, Similar in some ways to 
other disk wedge programs, I found the 
ease of use, versatility, and logic of 
these new commands to be better than 
any other disk enhancement program 
I've used, All the commands are en- 
tered by pressing a single shifted key 
and RETURN. Never has it been so 
easy to perform all the functions that 
are necessary to access your disk drive. 
People who use two drives will greatly 
appreciate the way you can switch from 
one to the other, The program starts 
with device #8 as the default device, If 
you have a second drive, just type #9 
(or whatever device number it's set for) 
and it becomes the new default device, 
accessible by all the single key com- 
mands, Typing #8 and pressing RE- 
TURN takes you back. 

Cassette users will also be interest- 
ed in this program. Type #1 and then 
press RETURN and the cassette is now 
the default device with all the single 
key commands available (except those 
that only relate to a disk drive), And 
there’s another option for the cassette 
user. Set the device to #2 and you can 
SAVE and LOAD at ten times normal 
speed. That's about as fast as your disk 
drive and it worked reliably every time 
I tried it. You must remember though 
that programs saved this way cannot be 
loaded without use of the cartridge. 

Two other commands are avail- 
able, SHIFT-R lets you renumber a 
BASIC program, selecting a new start- 
ing line number and increment value. 
SHIFT-C followed by a number be- 
tween 1 and 16 immediately changes 
the screen and border color—much 
faster than the usual POKEing method. 

RADARBASIC 50K is a handy utili- 
ty package. It provides additional RAM 
for BASIC, convenient commands, and 
it’s not necessary to unplug the car- 
tridge to run other programs. The car- 
tridge also works well in 64 mode on 
the Commodore 128. The brief instruc- 
tion manual is not as clearly written as 
it should be, but operation is so easy to 
understand that no one will have any 
difficulties using the program, 

—Howard Parnes 
Radarsoft 
Adam, Cobb, & King, Inc. 
655 John Muir Dr, E411 
San Francisco, CA 94132 
$37.50 





Lords of Conquest 


This is a classic strategy game for the 
Commodore 64 in which the player's 
ultimate goal is territorial supremacy. 
It’s a game of maps, invasions, and de- 
fense—and it has a large number of op- 
tions, Up to four players may compete, 
or you can play against your computer. 
As in Risk or the Japanese game Go, 
board games similar in concept to Lords 
of Conquest, players take turns selecting 
territories on the map. Some of these 
are important because of their location, 
others because of their wealth in natu- 
ral resources, 

Action takes place in yearly cycles 
consisting of several phases: develop- 
ment, production, trading, shipment, 
and conquest. During each phase, each 
player must make important decisions: 
Should you move your stockpile of re- 
sources to a new territory, better pro- 
tected from an attack? Or should you 
use your wealth to develop a weapon or 
establish a new city? 

The first phase to be considered in 
each year—after the first year—is de- 
velopment, You can invest your wealth 
in developing weapons or in building a 
new city. Often the choice is a difficult 
one: Is one of your neighbors preparing 
for an invasion? Will you gain more in 
the long run by developing a new city 
rather than a new weapon? 


BACKUP PROTECTED 
SOFTWARE FAST. 


From the team who brought you 
COPY II PLUS (Apple), Copy Il PC 
(IBM) and COPY Il MAC (Macin- 
tosh) comes a revolutionary new 
copy program for the Commodore 
64 and 128 computers. 

* Copies many protected 
Proaremceattomnalicalys (We 
update Copy |! 64/128 regularly to 
handle new protections; you as a 
registered owner may update at 
any time for $15 plus $3 s/h.) 

* Copies even protected disks in 
under 2 minutes (single drive). 

* Copies even protected disks in 
under 1 minute (dual drive), 

¢ Maximum of four disk swaps on 
asingle drive. 








Next, in a multiplayer game, 
you're faced with deciding whether to 
trade resources with other players. Of 
course, you may threaten, reason, 
bribe, or deceive your opponents in at- 
tempts to gain your own advantage. 
The computer doesn’t intervene in this 
phase—all trades are made verbally be- 
tween players. Once a deal has been 
struck, you relay the results to your 64. 

Following the trade phase, you de- 
cide whether to move your stockpile of 
wealth or transfer some of your forces 
to a more strategic location, 

Finally, you enter the conquest 
phase. This is where the real action in 
Lords of Conquest occurs. It's your 
chance to launch a relentless attack ona 
neighboring territory. If you’ve plotted 
your moves correctly, you could gain a 
strategic victory. A wrong move could 
tip your hand prematurely, 

Lords of Conquest is a highly in- 
volved scenario with many levels of 
complexity so that each game, whether 
against friends or the computer, is 
bound to have a different outcome. You 
may choose to play on any of the 20 
maps included, or, once familiar with 
the rules, you may create your own 
map. 

This is a highly enjoyable game. 
The designers have made it easy to use 
and easy to play. You'll find yourself 
very quickly concentrating on your 








¢ Includes fast loader, 12-second 
format. 

Requires a Commodore 64 or 128 

computer with one or two 1541 or 

1571 drives, 


Call 503/244-5782, M—F, 8-5:30 
(West Coast time) with your @B 
in hand. Or send a check 

for $39.95 U.S. plus $3 s/h, $8 
overseas, 


$39.95 


Central Point Software, Inc. 
9700 S.W. Capitol Hwy. #100 
Portland, OR 97219 


Ce Point 


INORIORATED 





Backup utilities also available for the IBM, Apple Ii, Macintosh and Atari ST. 
This product is provided for the purpose 19 YoU to make archival copies only, 
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For those of us still using programming 
incompetence as an excuse for not cre- 
ating our own computer games, Activi- 
sion’s GameMaker comes as a rude 
shock. GameMaker is a thorough, com- 
plete package that makes it relatively 
easy to design arcade games that actu- 
ally work. Game design is still no pic- 
nic, but spending the time needed to 
understand GameMaker will put the 
burden on the creative rather than the 
mechanical side of creating quality 
games. We can no longer hide behind 
incompetence. 

GameMaker consists of five sepa- 
rate modules: SceneMaker, Sprite- 
Maker, SoundMaker, MusicMaker, and 
the Editor. You use the first four to cre- 
ate the graphics and sound features of 
your design, then combine them into a 
working game by using the Editor. 
Once satisfied that your game is a good 
‘one, you can save it to disk and play it, 
give it away, or sell it. The finished 
game runs independent of the original 
program, 

All you need to design a game is a 
joystick; you don’t have to type any- 
thing. In each module, you use the joy- 
stick to move from feature to feature, 
name to name, even number to num- 
ber. Even the program commands are 
selected by joystick from a Command 
Window; lines with more than one in- 
struction still use only the joystick, 
Those without joysticks can use the 
function keys and the space bar instead. 

SceneMaker allows you to design 
the backdrops against which your game 
moves, It is in effect a paint program, 
with a wide choice of colors and such 
commands as Draw, Circle, Line, Box, 
Fill, Zoom, Copy, View, Move, and 
Erase. Anyone familiar with paint pro- 
grams will recognize that this list allows 
considerable flexibility in creating a pic- 
ture. In fact, GameMaker’s individual 
modules are all thorough and flexible. 

With SpriteMaker, you create the 
sprites that will move across the scene. 
Once again, everything is done with the 
joystick. You simply draw the sprite as 
you want it, then, if you wish, combine 
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strategy and not on how to communi- 
cate with the program. Playing time is 
usually less than three hours, and a 
“save game” option is available. 

Success in this game requires care- 
ful strategy and an ability to play offen- 
sively and defensively. Make the right 
moves, and you'll be hailed as the reign- 
ing Lord of Conquest. 

—George Miller 

Electronic Arts 
1820 Gateway Dr. 
San Mateo, CA 94404 
$32.95 





Garry Kitchen’s GameMaker 


it with other sprites, or with other 
frames of the same sprite, to animate it, 
For example, you might use four sprites 
to create a horse, then give each of the 
four six separate moving “frames”. Your 
horse will then run across the screen, or 
buck up and down. The animation is as 
sophisticated as you make it. 

SoundMaker creates sound effects. 
The SoundMaker screen resembles a 
“sound board” found in a recording 
studio, with knobs and sliders and 
gauges. The master controls are Repeat, 
Equalizer, Volume, Speed, and Frame 
(complex sounds can consist of several 
linked frames). Sound controls include 
Wave (noise, square, sawtooth, or trian- 
gle), Attack, Decay, Sustain, Release, 
Frequency, Speed, Pulse, Duration, and 
Tie. You use the joystick to create the 
sound, listen to it, modify it, and save it 
to disk. 

Since most arcade games contain 
music, GameMaker includes a Music- 
Maker module. The MusicMaker screen 
includes a keyboard, a staff, selectors 
for notes, channels, and instruments, 
and a music sheet. Those familiar with 
music programs on the Commodore 64 
will find this module, like all the mod- 
ules in GameMaker, quite sophisticated 
and versatile, 

To ease you into creating your own 
games from scratch, GameMaker in- 
cludes several samples for each mod- 
ule, There are plenty of precreated 
scenes, sprites, sounds, and tunes on 
the GameMaker library disk, which you 
can load and examine, change, or copy. 
These not only save time, but also help 
you learn how to use the features of the 
individual modules. By loading a sound 
effect into SoundMaker, for example, 
then twisting the knobs and moving the 
sliders, you can figure out quite easily 
what each command does. If you wish, 
you can create entire games by mixing 
the sprites, sound, music, and scenes al- 
ready provided. 

Once you have a scene, the sprites, 
the sounds, and the music ready to go, 
you put them all together using the Edi- 
tor, The Editor provides the program: 








ming language itself, and is the hardest 
module for nonprogrammers to use, 
Once again, though, GameMaker helps 
out, The manual contains a run- 
through of the various commands and a 
tutorial to get you started. Furthermore, 
the library disk includes several prede- 
signed games (Pitfall and Megamania 
among them) that you can load into the 
Editor and examine. How does Pitfall 
Harry grab the rope and jump over the 
pond? How does the score change? 
Simply load it into the Editor and find 
the appropriate line in the program. 

The heart of the manual is the Ad- 
vanced Game Design section. Here 
Garry Kitchen, GameMaker's creator, 
explains what to keep in mind when 
designing a game. Here too are listed all 
the commands possible in the Game- 
Maker modules, including explanations 
of the numerous commands in the Edi- 
tor. To create truly excellent games, you 
will need to master much of this sec- 
tion, and doing so is not easy. But you 
need not master them all at once, and 
you can work on individual commands 
as you create your design. 

If you get good enough, and you 
create an arcade game that you feel the 
world will want to play, Activision will 
welcome it as an entry in the Game- 
Maker design contest. The winner re- 
ceives $5000, a paid visit to Activision, 
and, most importantly, Activision will 
publish the game. If you've always felt 
able to design a great game, but never 
had the programming skill to attempt it, 
GameMaker is for you. Like any good 
game, writing it is not easy, but once 
you've done so, the rewards are endless. 

—Neil Randall 
Activision, Inc. 
2350 Bayshore Frontage Road 
Mountain View, CA 94043 
$39.95 
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COMMODORE 64 
COMPUTER 


(Order Now) 
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Com. 1541 
* C128 Disks 79‘ ea.* 
* Paperbock Writer 64 $39.95 


Disk Drive § 
13"' Color 
Monitor 

#13" Color Monitor $139.95 


CALL BEFORE YOU ORDER SPECIAL SOFTWARE COUPON PRICES MAY BE LOWER. 
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* Voice Synthesizer $39.95 
* 12" Monitor $79.95 
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jictures, and more at a blazing 100 Characters Per Second or 20 cps in the Near Letter quality mode. ( Looks just 
like it came from a typewriter. ) Plus, choose your printing mode (NLQ, Draft) from your wordprocessor or by 
simply pushing the controls on the front panel. Fantastic Quality at a Fantastic Price. List $349.00 SALE$179.95. 




















Print Method Ribbon (Life exp.) Line Spacing 
Serlal impact dot matrix (9 pin) Black: cassette (2.5 million characters) 1/6, 1/8, 7/72, and 1/216 inch 


Print Speed Dimensions Paper Food 
Draft- 100 CPS NLQ- 20 CPS 15.4 (W) x 10.9 (D) x 4.7 (H) Inch ‘Adjustable tractor and friction feed 
Character Sets Weight Paper feeding Direction 
96 ASCII Characters, Marker, Symbols Approx. 10 Ibs Bi-directional 
(includes Italic font) Character Spacing Copies 

Fixed 2 plus original 


Supply is Limited so Buy Today 


PROTECTS 


We Love Our Customers 
22292 N. Pepper Rd., Barrington, Illinois 60010 


312/382-5244 to order 












‘Add $10.00 for shipping. handling and insurance, Illinois residents 
please add 6% tax. Add $20.00 for CANADA, PUERTO RICO. HAWAIl 
ALASKA, APO-FFO orders. Canadian orders must be in U.S. dollars. 
WE DO NOT EXPORT TO OTHER COUNTRIES. EXCEPT CANADA. 

Enclose Cashiers Check. Money Order or Personal Check, Allow 14 
days for delivery. 2107 days for phone orders, 1 day express mail! 

VISA — MASTER CARD — C.0.D. 
No C.0.0. 10 Canada, APO-FPO. 


Cantus: The Music Improviser 


The Commodore 64's versatile sound 
chip, SID, has inspired a multitude of 
music software. Like word processors 
and spreadsheets, most full-range soft- 
ware companies offer music packages 
many of which are quite sophisticated, 
with fancy, hi-res screens, and lavishly 
produced manuals, Some even allow 
for considerable creativity in letting you 
program your own tone colors. Nearly 
all assume that the user wants to be a 
tunesmith, to create and arrange his 
own melodies, and perhaps accompany 
them with other melodies or a bass and 
drum line. 

Cantus is different. It’s a semi- 
random improvisation tool instead of a 
composer/arranger. It’s simple, acces- 
sible, interactive power with few “bells 
and whistles.” 

Perhaps the main difference be- 
tween Cantus and other music pro- 
grams is that it was conceived by a 
professional musician as a creative tool 
relevant to contemporary music. (Ryo 
Kawasaki, for Sight and Sound software, 
is the only other professional name that 
comes to mind in 64 music program- 
ming—and his work is unique too, in a 
quite different way.) The conceptual 
work on Cantus (and writing of the 
manual) was done by Michael Riesman, 
musical director and keyboardist of the 
Philip Glass Ensemble (for more on Mi- 
chael Riesman, see “Musicians Meet 
Computers” in the May 1986 issue). 
Those who know the music of Philip 
Glass know something of what to ex- 
pect here. Here is a music of controlled 
randomness, a music of process rather 
than result, a music of “doing” rather 
than “done.” 

Cantus is the fruitful collaboration 
of Riesman’s concept and the technical 
prowess of Steven Buchwalter, who 
coded Cantus entirely in the C 
language. 

Besides being easily learned and 
remembered, Cantus derives much of 
its accessibility from the fact that it has 
only one main screen. This screen con- 
tains all the stylistic choices—or 
“patches’"—the user makes. (There is 
an easily accessed store of 37 “canned” 
patches as well. You have the choice of 
just sitting back and enjoying them, ex- 
amining them as instructive examples, 
using them as “jumping off places,” or 
ignoring them altogether.) The system 
operates by making choices among the 
options and probability ranges you 
specify. As the texture is performing 
(the only way to describe it), you 
change Y/N options and distributions 
on the fly. 

Some of the choices relate to tone 
color (envelope, waveform, filtering, 
etc.)—of which a considerable range is 
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available (although not all the capabili- 
ties of the SID chip, as the manual im- 
plies). Most, however, are harmony/ 
chord, rhythmic (duration), voice rela- 
tion (texture), and octave options. All 
19 three-note chords (in prototype— 
the program mixes up voice registers or 
inversions itself) are available. So are 
independent, pair, or block textures 
(along with a rhythmic “offset” option 
that gives a strummed or arpeggiated 
effect), choices of duration and rest val- 
ue (relative distributions), and octave 
probabilities. The result is a kind of tex- 
tured music, with the user defining the 
overall parameters of the style, and the 
computer making specific random deci- 
sions within that style. 

Operation is remarkably simple: 
Cursor to the parameter you want to 
define (the cursor automatically jumps 
among active “‘fields’”), enter a value, 
and press RETURN. LOAD (CTRL-L) 
an alternate “musical environment’ 
(texture patch) in four seconds—either 
yours or one included. Start and stop 
with the RUN/STOP key. If you want 
to “see” the actual pitches at any partic- 
ular point (it’s rarely necessary), just 
switch to the alternate screen to see 
blocks jumping up and down on “oc- 
tave lines” with pitch names above the 
blocks (voices are color-coded). Freeze 
the performance and notation by press- 
ing a function key; resume by releasing 
the key, It’s wonderful to see such inter- 
activity so accessible, easy to learn, and 
well explained in a manual. 

Of course there are a few limita- 
tions, even bugs. Of particular note is 
the difficulty in turning off any of the 
voices. (In fairness it should be noted 
that the harmonic/chordal approach 
implies that all voices should be going 
most of the time, and that all voices 
play different pitches—another textural 
requirement.) The manual suggests set- 
ting unwanted voices to pulse with a 
width of zero. Unfortunately, this 
method gives bothersome clicks. If you 
go to the trouble of specifying envelope 
values A, D, and R to 15, however, the 
clicks will completely disappear. 

It's annoying (and perhaps unin- 
tended) that pressing HOME sends the 
disk drive into an abortive save, and 
that the DELete key takes you to the 
HOME position. Otherwise the pro- 
gramming is notably bug-free. 

Cantus is both educational and lots 
of fun. Like the environment of LOGO, 
it has great possibilities for creative play 
by children. Loading and saving patch- 
es are very fast (files are only four 
blocks each), and Cantus loads with 
Epyx’ FastLoad cartridge in only 35 sec- 
onds (almost two minutes normally). 

An extensive set of Library utilities 





is also included to perform all the disk 
functions normally involved in this sort 
of program. This too helps make Cantus 
easy to use for quick results. There is a 
minimum of technical obstacles. The 
four-page musical glossary of terms is 
most welcome, and the well-organized 
documentation is both succinct and well- 
written. 

It's worth making a point about the 
manual because this is a ‘cottage’ 
product, home produced and market- 
ed—a beautiful example of what you 
might do yourself, Pages are duplicated 
(single side) on a regular copier and as- 
sembled under a transulcent plastic 
cover with a friction plastic grip. The 
single disk is double-side taped to the 
inside back cover, and an index card 
flap taped over the top so the disk 
won't fall out, Low cost, effective, neat, 
clear, well-organized—a model “‘cot- 
tage” product. 

Cantus is a significant and unique 
music package. It’s inviting, involving, 
and contemporary. For creative play, 
process interaction, and music educa- 
tion applications, it’s hard to beat, I 
highly recommend it for participation 
in a unique musical environment. 





—Art Hunkins 
Algo-Rhythm Software 
176 Mineola Blvd. 
Mineola, NY 11501 
$39.95 @ 





COMPUTE!’s Gazette is 
looking for utilities, 
games, applications 
educational programs, 
and tutorial articles. If 
you've created a pro- 
gram that you think 
other readers might en- 
joy or find useful, send 
it, on tape or disk to: 


Submissions Reviewer 
COMPUTE! Publications 
P.O. Box 5406 
Greensboro, NC 27403 


Please enclose an SASE 
if you wish to have the 
materials returned. 
Articles are reviewed 
within four weeks of 
submission. 
































Your computer is a formidable opponent in this 
battle of wits. An excellent strategy game with 
four skill levels. For the 64, Plus/4, and 16. 


Can you outsmart your computer? 
“Slots” is a strategy game which 
challenges you to out-think your 
machine. You and the computer 
take turns dropping tokens into a 
box with eight vertical slots. To 
win, you must get four of your to- 
kens in a row vertically, horizontal- 
ly, or diagonally. Or you can win by 
being first to put a token at the top 
position of any slot in the box. Each 
time you select one of the eight 
rows in which to place a token, it’s 
dropped to the lowest available po- 
sition in that slot. Each slot is then 
filled from bottom to top during 
play. The game is tricky, though: 
What often seems to be a good 
move might be just the stepping 
stone the computer needs to win. 
Slots is written in BASIC, but 
the decision-making process is 
written in machine language, and is 


found in the DATA statements in 
the latter section of the program 
listing. The program runs on the 
Commodore 64, Plus/4, and 16. To 
get started, type in the program 
using “The Automatic Proofread- 
er,” found elsewhere in this issue. 
When you're finished typing, be 
sure to save a copy. To play the 
game, load it and type RUN. After a 
brief wait, you're asked if you wish 
to go first. Press Y (for yes) or N if 
you'd rather the computer start. 
Going first is not necessarily an 
advantage. 

You're then asked to select a 
playing level, 1-4. The level you 
choose determines the number of 
moves ahead the program looks. At 
level 1, the computer looks only at 
its next move. At level 2, the com- 
puter looks at its next move and 
your next possible move. At level 3, 








it looks one step beyond level 2, 
nd at level 4, another step beyond. 
Each move has a maximum of eight 
possible positions, with each posi- 
tion having eight possible future 
positions. At level 4, the computer 
looks at a maximum of 4,096 possi- 
ble positions. For that reason, level 
4 takes a bit longer (only several 
seconds actually). 

If you have a 128, try adding 
the following lines to speed up the 
program in 64 mode: 

61 POKE 53296,0 
471 POKE 53296,1 

(The second POKE speeds up 
the 128’s 8502 chip to 2 MHz, and 
the first POKE resets it to 1 MHz, 
the normal processing speed of the 
64. If you include these POKEs, the 
initial screen fills with garbage for 
about 20 seconds while the charac- 
ters are being redefined. This is 
normal.) 

After entering the play level, 
the game screen appears. Just type 
the slot number, 1-8, when 
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prompted. If you decide to change 
levels in the middle of a game, 
press L when you're prompted for a 
slot number, After each of your 
moves, the computer chooses its 
move and places a token, 


The Computer’s Intelligence 
The primary thinking routine in 
Slots is a recursive procedure—that 
is, a procedure that calls itself as a 
subroutine. 100 X=1; GOSUB 100 
is an example of a recursive proce- 
dure in BASIC. This particular pro- 
gram does nothing but crash your 
computer, but it offers an example 
of a function calling itself. A mean- 
ingful recursive procedure needs a 
test that stops the subroutine calls, 
and begins returning from the sub- 
routine calls, 


Slots runs faster and uses less 
memory by using a recursive func- 
tion, At each possible move posi- 
tion, the program looks at the eight 
positions that could occur on the 
next move. Each one of the eight 
positions can be answered by an- 
other eight, and so on. Slots needs 
only one routine that loops eight 
times to look at each slot. In each 











The 64 has just defeated another oppo- 
nent. Notice the four tokens running 
diagonally beginning in slot 4. 


loop, the routine calls itself recur- 
sively. If the number of the play 
level you chose has been reached, 
the subroutine calls are stopped. 
The looping then continues. When 
eight loops have occurred at any 
level, the returning from the sub- 
routine calls begins. 

Let’s say you choose to play 
level 2, which means the recursion 
goes two levels deep. To analyze 
the board, the computer calls the 
“what if” routine eight times: What 
if I played in position 1? What if I 
played position 2? and so on up to 
slot number 8. But while it’s in the 
middle of a what if, the routine calls 





itself. It checks a position by asking 
what if the computer chooses slot 1 
and the player also chooses 1; what 
if the computer plays 1 and player 
picks 2; and so on. When it’s done 
considering all eight possible 
moves and the eight responses to 
each move (64 positions in all), it 
compares each for the best chances 
of winning, It then returns from the 
machine language routine. 

Returns from the recursive 
calls also occur when a win is im- 
pending. If you play at level 4, 
you'll see that the program does not 
take any time to think when you're 
about to win. This is sometimes 
called mini-maxing or tree-pruning. 
It prevents the program from wast- 
ing time looking at future moves 
that have no relevance to the deci- 
sion process. 

Slots does not make your com- 
puter a genius, and sometimes it 
plays a better game at lower lev- 
els—but this may come as a result 
of its not thinking as much, A ran- 
dom function is included in the pro- 
gram to prevent it from making the 
exact moves every time. 

See program listing on page 100. @ 





Guard Against Life’s 
Little Accidents 


a rrr, 
1 (ea 


With MICRO DOCTOR, Care, Troubleshooting 
and Simple Repair for your Commodore 64" by 
Hoyt Hilsman, you can prevent 90% of common 
microcomputer maintenance ills and treat 50% 
of your problems using household tools. 


Micro Doctor 
The First Name in Computer Health 





Little, Brown and Company 
Boston, MA 02108 


$13.95 
ISBN 36413 


To order call 
800-343-9204 
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For the Commodore 64 


kyan pascal is the most complete package available for learn- 
ing and using the Pascal language. 
kyan pascal is easy to use, lightning fast, and loaded with fea- 
tures. It's a full Pascal implementation. Itcompiles andruns many 
times faster than other Pascal compilers. 
kyan pascal features: 

* Optimized Machine Code Compiler; 

Built-In Full Screen Text Editor; 

*String-Handling, Chaining, Include File, and Other 

Powerful Extensions; 

*Random Access Files and Full Graphics Support; 

Built-In Assembler (Allows Full Hardware Control); 

© 13-Digit Arithmetic Precision; and, 

Tutorial Manual with Sample Programs. 
kyan pascal requires 64K of memory and a single disk drive. 
No additional hardware is necessary. And, itcomeswith kyan's 
MONEY BACK GUARANTEE. ..If not completely satisfied, 
return it within 15 days for a full refund. 


kyan pascal for the C64 $69.95 
(Add $450/copy for handling; $1200 outside North America: California 
residents add $4 55/copy for sales tax) 
Send Check/Money O1 kyan software, Dept. X 
Call: (415) 775-2923 ~, 1850 Union St., Ste. 183 
MC/Visa Accepted 5]. San Francisco, CA 94123 











BRAND NEW FROM CSM!! 


SNAPSHOT 64 ENHANCEMENT DISK 
‘A must for every SNAPSHOT 64 owner! 
SNAPSHOT 64 owners, you know it's the best backup cartridge available. We 
thought the best would be good enough, but you wanted more, Now the SNAPSHOT 
64 ENHANCEMENT DISK gives it to you! The most requested utilities and aids 
are included in this affordable, easy-to-use package. Look at what you get: 


FAST LOADER - Add CSM's own fast loader to your SNAPSHOT 64 backups. 
Loads your backups several times faster! Works with 1541, 1571 and '"1541-clone”’ 
drives. 


CARTRIDGE MAKER - All the software you need to install your SNAPSHOT’ed 
program on a bank-switch cartridge board. Downloads and runs in seconds! Perfect 
for business programs or your most-used utilities! All the EPROM supplies you'll 
need are available separately from CSM. 


UPDATED BOOT - Allows SNAPSHOT 64 to handle many new (and some old) 
programs! Automatically included in the RAST LOAD and CARTRIDGE MAKER 
options or can be used separately, No need to ra-SNAPSHOT your originals! 


INVESTIGATIVE UTILITIES - For the “hacker” type. If you're using SNAPSHOT 
64 to explore program protection or operation, you need these aids, Uncompress 
the main files so you can investigate and modify them. Then recompress the new 
versions and they'll be booted as usual. 

COMPREHENSIVE MANUAL - Covers the ENHANCEMENT DISK ulilities plus 
{ull information on the various SNAPSHOT files. 


All this for only $14.00 plus shipping 


SNAPSHOT 64 


The original cartridge! Takes a "snapshot" of your original program, saves it to 
disk and adds an autoboot. Your program can be interrupted at almost any point 
and restarted at the exact same point! The fastest, easiest-to-use and most effec- 
tive utility of its kind! Backups do not require the cartridge to run, and are com- 
patible with most fast load cartridges (or see ENHANCEMENT DISK above), 


$49.95 plus shipping 


1541 DISK DRIVE ALIGNMENT PROGRAM 
VERSION 2.0 


Still the best! No special tools or knowledge required, just average mechanical 
ability. See the review in the Oct, 1984 Compute's Gazette and all the other top 
magazines, 


Still only $44.95 plus shipping 


EPROM PROGRAMMERS HANDBOOK 


A must if you're programming EPROMs! Covers the important concepts in a 
readable style. The accompanying diskette includes many useful utilities. Put up 
to 10 programs on a single cartridge, with a menu added automatically! Modify 
the KERNAL and DOS ROMs! Much more! 


Book plus diskette for only $32.95 plus shipping 


THE SOURCE GENERATOR 


A SYMBOLIC DISASSEMBLER that turns ML into assembly language, complete 
with labels. Choice of PAL, CBM or MAE formats. Disassemble 6502, 6511 (MSD), 
65C02 or undocumented opcodes, Fast and easy to use 


$34.95 plus shipping 


PROGRAM PROTECTION MANUAL, 
VOLUMES | & II 


Vol, tis for the beginner and covers bad blocks, disk directories and BASIC, Volume 
Mis more advanced - over 265 pages on encryption, GCR code, nonstandard for- 
mats, advanced cartridges and much, much more! 


Vol. 1- $29.95, Vol. 1 - $34.95 
Disk included with each. 


CARTRIDGE BACKER II 


New auto-parameter system archives more programs than ever. Backs up car- 
tridge to disk and adds autoboot. Backups run from disk - NO special hardware 
required 


$54.95 plus shipping. 
Update for prior purchaser only $14.00 


CSM Software, Inc. 


P.O. Box 563, Crown Point, IN 46307 
(219) 663-4335 


VISA AND MASTERCARD ACCEPTED DEALER INQUIRIES INVITED. 





TRY THIS ON 
LO] Gh) 74 5 


At the United States Space Camp, 
you'll have to, It’s required attire, you see, in 
your training for a Space Shuttle mission. 
You'll be piloting a shuttle simulator, working 
under weightless conditions, doing what most 
people only see on the six o'clock news. 


Our space station construction software, can 
get you to Space Camp for the time of your 
life. You'll need to get your hands on it 
and build us your best station. 


‘d like to see you in this suit. Soon. See your 
favorite software dealer for a Space Camp 
Scholarship booklet and construction 
guidelines, or write to us at 
the address below. 


HesWare 
ey 


P.O. Box 631-SCS 
So. San Francisco, CA 94080 
(415) 871-0570 





As the sole trained pilot for the 
army’s top-secret “Chopper 1,” an 
attack helicopter equipped with a 
powerful pulse laser, you're sent to 
defend your city when it’s suddenly 
invaded by aliens. The city’s other 
defense is a glowing force field 
which hovers above the skyline. 
The alien’s spaceship passes back 
and forth over the city while con- 
tinually dropping bombs which 
gradually blast their way through 
the force field and, eventually, into 
the city itself. The bombs will also 
destroy your chopper if contact is 
made. You've been sent to destroy 
the bombs with Chopper 1’s laser 
before they reach the city. The 
alien's spacecraft is made of an in- 
destructible alien alloy, and it’s in- 
vulnerable to your laser blasts. It 
will, however, destroy you if you 
get in its path, 

You control Chopper 1 with a 
joystick (in port 2). You can move 
the helicopter left, right, up, or 
down with the joystick—and you 
can fire the laser by pressing the fire 
button. 


Save The City 

The spaceship is armed with 100 
bombs. Should any part of the city 
remain standing when its supply of 
bombs is exhausted, you'll receive a 
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Only quick maneuvering and accurate firing can 
save the day in this fast-action, arcade-style game. 
For the Commodore 64. A joystick is required. 









moyen 
o | i 


aud ns 
The player has just destroyed a bomb. 
Notice that the alien spacecraft has just 
released two more above Chopper 1. 


bonus which will be added to your 
score, The greater the amount of 
the city remaining, the higher the 
bonus. You'll then move on to save 
another city and to a higher skill 
level where the bombs drop faster. 
You receive 10 points for each 
bomb you destroy. 

Should a city be totally de- 
stroyed before the alien’s bomb 
supply is exhausted, no bonus will 
be awarded, and you're given the 
chance to save another city at the 
same skill level, 

When you see the message 
GAME OVER, you can select the 
level at which you wish to begin by 
pushing the joystick up or down to 
change the skill level. Press the fire 
button to start the game. 





1 


The army has a supply of four 
Chopper 1 helicopters, the first 
three of which are equipped with 
emergency escape parachutes. 
Should the aliens destroy your heli- 
copter, the escape parachute will 
automatically activate, and you'll 
land safely. If the fourth Chopper 1 
is destroyed, all is lost. The game 
ends, You'll find it difficult to main- 
tain your choppers for very long at 
the higher skill levels. 


Typing It In 

Since “Chopper 1” is written en- 
tirely in machine language, you'll 
need to enter the program with 
“MLX,” found elsewhere in this is- 
sue, Load and run MLX, and when 
prompted for starting and ending 
addresses, enter the following: 
Starting Address: 0801 

Ending Address: 175F 

Be sure to save a copy when 
you've finished typing it in. To play 
the game, load it (LOAD “‘file- 
name’’,8) and type RUN. Be sure to 
have a joystick in port 2. Press the 
fire button to begin play. 

If you'd rather not type in the 
program, send a blank disk, $3, a 
self-addressed mailer, and 50 cents 
to cover postage (no U.S, stamps, 
please) to: 

Mike Sedore 

27 Melbourne St. 
Hamilton, Ontario, Canada 
L8P 2A5 


See program listing on page 95.  @ 











Pirate Co 


Children can enter a swashbuckling world of 
pirates as they attempt to find Treasure Island 
and the treasure chest in this miniadventure. 
While providing entertainment and challenge, it 
also sharpens map-reading and direction skills. 


For the Commodore 64. 


In “Pirate Cove,” your child plays 
the role of a buccaneer who’s found 
a map showing the locations of ten 
islands, Starting from Pirate Cove, 
he or she must navigate around the 
territory trying to find Treasure 
Island, Along the way, the child 
may find Spice Island, Mermaid’s 
Lagoon, or Skeleton Island, among 
others, Also, the child may search 
sunken ships or fight the Sea Mon- 
ster. The game is over when Trea- 
sure Island has been found and the 
treasure chest successfully opened. 


Playing the game is quite sim- 
ple. In fact, older children may be 
able to play the game without in- 
structions, After typing in the pro- 
gram, save a copy. To play, load the 
program and type RUN. 

At each land location on the 
map you're offered five options. 
Two of these options involve 
searching the area. The third choice 
is to read the map, the fourth to sail 
on, and the last choice to list what 
you have in your possession (in- 
ventory). Make your selection by 


ve 


’ Barbara Schulak ol 











pressing the CRSR UP key to move 
the red bar to your choice, and then 
pressing the RETURN key. If you 
choose to sail on, the program asks 
which direction you want to go 
(north, south, east, or west), Again, 
use the red bar to make this choice, 

If the Read Map option is cho- 
sen, the screen displays the naviga- 
tional map. Islands are indicated by 
green, water by blue, and your cur- 
rent location by yellow. Choosing 
the List Inventory option allows 
you to see what items you’ve gath- 
ered on your journey. (A few of 
these can be quite helpful.) When 
you're sailing (the High Seas op- 
tion), you may choose either to read 
the map or to sail on, 

Each time the program is run, 
the location of the islands changes 
so that the game may be played 
often. More advanced players might 
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CURRENT LOCATION: PIRATE COVE 


nan All programs listed in 

this magazine are available 
on the GAZETTE Disk. 

Children can easily play “Pirate Cove” See elsewhere in 

eh spe lar aectio. this issue for details. 
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The Most Competitive Prices on 
PRESS any KEV'T0 COMTIMUED COM MODORE= 
=~ 
Reading the map shows the location of 
your ship and the islands. The location 
of the islands is different each time the 
game is played. 
want to play the game without Commodore Products PPI Joystick none CHT 
reading the map, charting their way 128 Computer $ Call _DSI-PPI Interface $39.95 
‘on paper instead, C1571 Disk Drive $ Call —Tymac Parallel Interface.....$ 59.95 
‘roreammers mi note tat || SMES SERS aa 
THIS (GRE CE ICAU) C1700 128K RAM . -$ Call Fuji 5%’ DS/DD Diskettes (Bx) $ 12.95 
have been used to form a highlight- C1750 512K RAM . $ Call Fuji 3!” DS/DD Diskettes (Bx) $ 26.95, 
ing bar for input of choices. In writ- Commodore 128 Software Printer Sale 
ing a program for children, it’s CMS Accounting . ..$ 139.95 Transtar 120 $219.95 
essential to make the input for them SuperBase 128, 1S 64,95 Transtar 130 .$ 294.95 
as easy and foolproof as possible, SuperScript 128 -$ 54.95 Cardco LO-1,... $184.95 
This method seemed a good choice Epyx Multiplan . $42.95 CBM 6400 (40 cps) » $349.95 
despite making the program a bit Ha Sveeneg : fain Star SG-106 $ 229.95 
longer. I’ve also used sprites (ex- Se ONS OS a i Star SG-15. ... oo $ 364.95 
8 a P’ : PaperBack Writer. . $34.95 Star NX-10 (New) -- $249.95 
panded both horizontally and verti- PaperBack Planner . $34.95 Citizen MSP-10 (160 cps)... Call 
cally) for the various pictures. PaperBack Filer . $ 34.95 Citizen MSP-15 (160 cps)...$ Call 
See program listing on page 98. @ Freeze Frame ...... $39.95 
Fast Load Cartridge . $ 23.00 New Computers from Commodore 
Vorpal Utility Kit. . $ 23.00 — pcjo & PC20 
Met Cie mul) : nies (BM PC Compatibles) .....§ Call 
jobs Term Pro 128...... | C-64C NEW Low Profile 64 
COMPUTENs Commodore 128/64 Accessories With|GEOS ,......0s 0000s $ Call 
Anchor 6480 Modem . (New)$ 149.95 C1541C NEW Low Profile 
GAZETTE PPI SuperSketch .......0...8 1995 1544.0... $ Call 
TOLL FREE ORDERING INFORMATION: 1-800-233-6081 
Subscription Order TOLL FREE 1-800-233-6081 
. Others Call (214) 247-7373 
Order Line Visa/Master Card — C.0.D. or DALLAS DIRECT 
-800-247-' Prepaid Orders Accepted “We used to work for Commodore 
1 eae Same Day Shipments « All Products now we work for you!” 
Shipped F.0.B. Dallas, Texas 3208 Beltline Road Ste. 210 
1-800-532-1272 Call and Order Today! Dallas, Texas 75234 














Address Cataloger 


Kevin Mykytyn 


There are other address file programs for the 
Commodore 64, but we haven’t seen one this fast, 
versatile, and easy to use. “Address Cataloger” 
offers a number of useful features, including a 
directory, string search and multiple search, 
alphabetical sort, and several printout formats. 
Menu operations make it especially easy to 


manage. 


“Address Cataloger’’ is a special- 
ized database designed to maintain 
an up-to-date file of names, ad- 
dresses, telephone numbers, and 
any special notes you may want to 
add for each entry. Written for the 
Commodore 64, it includes a num- 
ber of useful features not frequently 
found in programs of this kind: a 
view of the disk directory, an in- 
stant search for any group of char- 
acters, alphabetical sorting, and a 
printer option with your choice of 
three information formats. And it’s 
written entirely in machine lan- 
guage—so all operations are ex- 
tremely fast. 


Typing It In 

To enter the program, you'll need 
“MLX,” the machine language en- 
try program elsewhere in this issue. 
Be sure you read and understand 
the instructions for MLX before you 
begin entering the data for Address 
Cataloger. When you first run MLX, 
you're asked for the starting and 
ending addresses. The correct val- 
ues are: 

Starting Address: 0801 

Ending Address: 1458 

Next, begin entering the data for 
Address Cataloger. When you've 
finished typing it in, be sure to use 
the MLX Save option to make at 





least one copy of the program. To 
use Address Cataloger, simply load 
it and type RUN as you would for a 
BASIC program. 


The Menu 
When you run Address Cataloger, a 
menu appears: 

LOAD DATA 

SAVE DATA 

DIRECTORY 

VIEW DATA 

SEARCH DATA 

ALPHABETIZE 

PRINT DATA 

QUIT 

Ared highlighting bar appears 

over the first choice, LOAD DATA. 
To make a selection, use the up/ 
down cursor key to move the bar to 
one of the items and press RE- 
TURN. Let’s look at each of the 
menu choices and see how to use 
them. 


LOAD DATA: Use this option to 
load a previously saved address 
file. (If you’re using disk, it’s a good 
idea to save your files on the same 
disk as Address Cataloger—you'll 
be able to check the filenames by 
selecting DIRECTORY, the third 
choice on the menu.) After pressing 
RETURN, you're prompted to press 
T for tape or D for disk. You're then 
prompted to enter a filename—up 
to 12 characters are accepted. Disk 





users may use the wildcard (*) con- 
vention for filenames; KIW* will 
load the first file beginning with the 
letters KIW, for example, whether 
it's KIWANIS or KIWIFRUIT. If you 
wish to abort the load, just press 
RETURN without entering a file- 
name—you’re automatically re- 
turned to the menu. 

SAVE DATA: After you've en- 
tered data and want to save it, cur- 
sor to this item on the menu. The 
procedure is identical to LOAD 
DATA, described above. If you’re 
saving a large file, make sure you 
have enough room on the disk or 
tape. Address Cataloger allows a 
maximum of 230 records per file. 
(Disk users should note that 230 re- 
cords will use 182 blocks of disk 
space.) If you save a file to disk with 
the same name as a previously saved 
file, the new file will replace the old 
one, 

DIRECTORY: This option is for 
disk users only. When you press 
RETURN, the names of files created 
and saved by Address Cataloger are 
displayed; unrelated filenames are 
not displayed. If a large number of 
filenames appears and begins scroll- 
ing, you can pause the list by press- 
ing the SHIFT or CTRL keys, 
VIEW DATA: This puts you in the 
data entry and editing section of the 
program. After pressing RETURN, 
a screen appears: 


rr 
Last. nate 
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MICHAEL SANTORO 215-555-0718 


LISA 

488 CRESTWOOD DRIVE 
MERCERVILLE, PA 

19027 

CHRISTMAS CARD/BIRTHDAY!JULY 12 
CHILDREN! CHRIS AND DANNY 





MICHAEL SANTORO 215-555-0719 
LIsA 

488 CRESTWOOD DRIVE 

MERCERVILLE, PA 

19027 





MICHAEL SANTORO 
488 CRESTWOOD DRIVE 
MERCERVILLE, PA 
19027 





Three printing formats are available with “Address Cataloger”: The first includes all 
information (name, address, phone, and two lines of extra information), the second 
prints all data except the extra information, and the third format, for address labels, 


prints a name and address only. 


Notice the record number dis- 
played in the upper left corner of 
the screen. There are 18 key combi- 
nations you can use for a variety of 
editing functions: 


CTRL-A. Abort. If you're in 
the process of editing a record and 
decide to keep the original data, 
CTRL-A (the CTRL key and A 
pressed simultaneously) aborts the 
current editing changes and re- 
stores the data most recently saved 
for that record. 

CTRL-D. Delete. This deletes 
the record currently displayed and 
numerically adjusts all subsequent 
records. For example, if you delete 
record 15, record 16 becomes re- 
cord 15, 17 becomes 16, and so on. 

CTRL-I, Insert. This moves 
the displayed record and all subse- 
quent records up one (15 becomes 
16, and so on) so you can insert a 
new record—for example, Morris 
between Miller and Muller. The In- 
sert function will not work if the file 
is full (if it already contains 230 
records), 

CTRL-F. Find. This option can 
be used only after SEARCH DATA 
is selected from the menu. It dis- 
plays the next record that matches 
the search string (see SEARCH 
DATA below). 

CTRL-P. Print. This option 
can be used only after PRINT 
DATA is selected from the menu. It 
prints the displayed record in the 
selected format (see PRINT DATA). 

SHIFT-+. Next Record. By 
pressing the SHIFT and plus-sign 
(+) keys, the current record is 
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stored in memory and the next re- 
cord is displayed. 

SHIFT-—. Previous Record. 
The SHIFT and minus-sign (—) key 
combination enters the current re- 
cord into memory and displays the 
previous record. 

Commodore-+ or Commo- 
dore-—. Skip Ten Records. Press 
the Commodore key and the + or 
— key to skip ahead or back ten re- 
cords. For example, if you're on re- 
cord 36, Commodore-+ will display 
record 46. In the same situation, 
Commodore-— will display record 
26. 

DEL, Backspace. Press the DE- 
Lete key to erase the character to 
the left of the cursor. 

+, Delete. The left-arrow key 
(the upper left key on your key- 
board) moves all characters to the 
right of the cursor one space to the 
left. 

INST. Insert. This key (SHIFT- 
INST/DEL) moves all characters 
under and to the right of the cursor 
one space to the right. 


RETURN. Next Field. Press 
RETURN to move the cursor to the 
beginning of the next field. 


CRSR-DOWN. Next Field. 
Same as RETURN. 


CRSR-UP Previous Field. This 
key moves the cursor to the begin- 
ning of the previous field. 

RUN/STOP. Return to Menu. 
This key enters the currently dis- 
played record into memory and 
then displays the menu. (If 
SEARCH DATA was selected from 








the menu, RUN/STOP activates 
the search—see SEARCH DATA 
below.) 

HOME. Clear Field. This key 
clears the field containing the 
cursor. 

CLR/HOME. Clear Record. 
This key (SHIFT-CLR/HOME) 
erases all data in the record dis- 
played. (It can be restored immedi- 
ately with CTRL-A.) 


SEARCH DATA: When you 
choose to search through the file, 
the data entry screen appears, as 
previously shown. Enter any com- 
bination of characters—a search 
string—in any field. Just type in the 
string you want to search for in the 
appropriate field and press the 
RUN/STOP key. (For example, a 
MAS in the Last Name field will 
find THOMAS, a 414 in the Phone 
field will find anyone in the 414 
calling area, or CHRISTMAS in the 
Extra field will find anyone you 
wish to include on your Christmas 
card list—if you've set up your file 
for this purpose.) 

When a match is found, the re- 
cord is displayed. If you wish, you 
can edit any part of the record. To 
find additional matches, press 
CTRL-F. If no more matches are 
found, you'll notice that the record 
number has not changed. You can 
do multiple searches also—for ex- 
ample, SMITH, LOS ANGELES in 
their respective fields. 

If no matches are found, the 
screen displays NO MATCH and 
PRESS ANY KEY. The menu reap- 
pears after pressing a key. 


ALPHABETIZE: This option sorts 
all records alphabetically by last 
name. In the case of identical last 
names, the sort will look at first 
names and alphabetize according- 
ly. For example, if you have five 
Smiths in your address file, they'll 
be alphabetized under Smith by first 
name: Al, Dorothy, Mike, Richard, 
and Walter. 

You can also use this option to 
clean up your file from time to time. 
After you've used the file for a 
while, you're likely to have some 
blank records, By alphabetizing, 
you'll condense your file—the pro- 
gram removes all blank records and 
renumbers existing files, thus sav- 
ing space. (It’s a good idea to avoid 
blank records when entering re- 
cords—a lot of these in your file will 








slow down program operation.) 
PRINT DATA: Before choosing 
any options from this menu item, 
be sure your printer is turned on 
and the paper properly aligned. 
There are several choices to make 
before printing out data from an ad- 
dress file. After selecting this op- 
tion, a small menu appears: 

ALL INFORMATION 

PHONE LIST 

ADDRESS LABELS 

MAIN MENU 

The first choice, All Infor- 
mation, prints all the data in a file. 
The Phone List selection prints all 
data except the information in the 
Extra field. Address Labels prints 
all data in the Name, Address, City, 
State, and Zip fields. When printing 
address labels, you can adjust the 
printer linefeed by typing POKE 
5176, x, where x is the number of 
linefeeds you want. As written, the 
program uses six linefeeds. If you 
wish to make a permanent adjust- 
ment, load the program, type this 
POKE in immediate mode, and re- 
save the program with a new file- 
name. The final choice, Main 
Menu, provides an easy way to exit 
from the print option, 

After selecting one of the three 
printing formats, another menu is 
displayed: 

SELECTED 
ALL 
MAIN MENU. 

The first choice, Selected, al- 
lows you to choose which record or 
records will be printed, You're pre- 
sented with the data entry screen 
(as in the SEARCH DATA option). 
Enter a search string in the appro- 
priate field(s), and press RUN/ 
STOP. All records that match are 
then printed out. If you wish to stop 
the printing after any record, press 
RUN/STOP. 

If the All option is selected, all 
records are printed out. Again, 
RUN/STOP will halt the procedure, 

If you've selected a printing 
format (All Information, Phone 
List, or Address Labels), and then 
go to the main menu (ignoring Se- 
lected or All), you can then print 
out individual records from within 
the View Data option by pressing 
CTRL-P. 


QUIT: This option exits the pro- 
gram and returns you to BASIC. 


See program listing on page 93, @ 





Expandable 


Graphics Dump 


For The 
Commodore 1526 
And 
MPS-802 Printers 


Fred Solmer 


Here’s a quick and easy way to get standard- or 

double-sized high-resolution printouts. The pro- 
gram works with Print Shop, Doodle, Koala Pad, 
and other hi-res screens. Versions for the 64, 128, 


and Plus/4. 


The April 1985 issue of COMPUTE!’s 
GAZETTE contained a useful program 
titled “1526 Hi-Res Screen Dump,” 
which allowed 64 owners to print 
out high-resolution screens on Com- 
modore’s 1526 or MPS-802 print- 
ers—models that aren’t normally 
capable of high-resolution graphics 
printing. ‘‘Expandable Graphics 
Dump,” for the Commodore 1526 
and MPS-802 printers only, goes a 
few steps beyond. It provides for col- 
umn placement of the normal screen 
dump, allowing it to be printed out 
anywhere from column 0-40. Also, a 
blowup option is included. With a 
single keypress, you can get a print- 
out twice the size (horizontally and 
vertically) of the normal one. Two hi- 
res screens could be combined into 
an 842” X 11” “poster.” 
Expandable Graphics Dump 





works with almost any hi-res screen, 
The 64 version prints graphics 
screens created with the Print Shop 
(“Screen Magic” pictures only), Doo- 
dle, and the Koala Pad. In fact, it’s 
compatible with almost any software 
designed to make hi-res screens. 


A Simple Procedure 

After typing in the version for your 
computer (Program 1 for the 64, Pro- 
gram 2 for the 128 or Plus/4), be sure 
to save a copy. Be especially careful 
when typing the numbers in the 
DATA statements. (It’s recommend- 
ed that you use ‘‘The Automatic 
Proofreader” to assist you in typing 
the program correctly.) 

Before getting started, be sure 
your printer is turned on. If you own 
a 64, first load your hi-res screen as if 
it were a machine language program: 
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Three Hi-Res Printouts: 








Double-sized printout of barnyard animals created with the Koala Pad (the 
striped lines in this picture are a side effect of multicolor mode). 
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LOAD“ screenname’,8,1. You proba- 
bly won't be able to see it, but it has 
been loaded into memory. Then type 
NEW. Next, load Expandable 
Graphics Dump, and type RUN. The 
screen prompts make it very easy to 
use. In the 64 version, you're first 
asked if the hi-res screen was created 
by Print Shop. After you press the ap- 
propriate key, you're asked to choose 
a normal size or enlarged, double- 
size printout. After making this selec- 
tion, you're asked for a “space-over” 
value, 0-40. A computer screen is 40 
columns wide, but the printer has 80 
columns. The space-over number 
controls the number of spaces be- 
tween the left margin and the printed 
picture. For example, if you wish 
your hi-res screen to be printed at the 
left margin, choose 0. To center it on 
the page, enter a value of 20. 

On the 128 and Plus/4, you 
may load Expandable Graphics 
Dump first. Then use the built-in 
graphics commands to create a pic- 
ture in GRAPHIC 1 mode. When 
you're satisfied with the result, load 
Expandable Graphics Dump (if you 
haven't already done so) and run it. 
In this version, you're asked to 
choose a “1:1” (normal size) or blow- 
up printout, and then a space-over 
value, as described above. (The com- 
mercial software mentioned above— 
Print Shop, for example—is written 
for the 64. Commodore 128 and 
Plus/4 versions of these products are 
not available at this writing.) On 
these two machines, you can draw a 
picture using the built-in graphics 
commands, exit to the text screen 
(with GRAPHIC 0), and run the pro- 
gram. It’s not necessary to save the 
picture to disk and load it back into 
memory. 

Note that the 64 version of Ex- 
pandable Graphics Dump is written 
for hi-res screens which can be saved 
as disk files. This restriction means it 
can’t be used to print the greeting 
cards from Print Shop, although it 
works well with the “Screen Magic” 
portion of the program. Also, Ex- 
pandable Graphics Dump handles 
monochrome hi-res screens some- 
what better than multicolor screens. 
If you look closely at the Koala Pad 
illustration, you'll see that some col- 
ors have been translated to stripes. 
This is a result of the way the addi- 
tional colors are stored in the hi-res 
bitmap. 

See program listings on page 106. @ 








machine let 


NGUAGE 


beoinners 


Richard Mansfield 
Senior Editor 


Last month we created a simple 
BASIC action game that illustrates 
many of the essential techniques 
used to write “arcade style’ games. 
Let's finish describing how it works 
and then translate it into machine 
language (ML). 


PRINT" {CLR} 

PLR = 1654:ENY = 1034:X 
= -1:KE = 212:REM USE 
{SPACE}KE = 203 FOR 64 
FOR I = 1 TO 24 

GOSUB 1660:GOSUB 2000 
NEXT I 

X = NOT X 

GoTo 128 

POKE PLR, 32 

IF PEEK(KE)=47 AND PLR 
<1984 THEN PLR = PLR+4 


sc 108 
EM 110 


cG 128 
XD 130 
AS 148 
KA 1590 
cP 166 
HA 1080 
BK 1616 


a 
IF PEEK(KE)=44 AND PLR 
>1854 THEN PLR = PLR-4 


DH 1628 


8 
POKEPLR, 219: IFPEEK (PLR 
-20)=209'THENP RINTCHRS ( 
7) :COUNT=COUNT+1:PRINT 
" {HOME} “;CO 
RETURN 

POKE ENY,32 
If X THEN ENY 
1GOTO 2030 
ENY = ENY-40 
POKE ENY, 269 
RETURN 


FP 1036 


DA 1848 
CC 2888 


BK 2018 = ENY+49 


RR 2626 
AH 2030 
JB 2040 


Line 130 illustrates object 
weaving. The elements of an action 
game—all the objects from the 
alien mothership to the human’s at- 
tack vessel—must be acting in con- 
cert, or the visual effects will appear 
jerky or worse. In this example 
game, one obvious design consider- 
ation is that each object should take 
about the same amount of time to 
compute, The subroutines are ac- 
cessed so that the player object 
moves just one space on the screen 
and then waits until the enemy ob- 
ject takes its turn, 

Finally, when the enemy has 
moved 24 times, it’s necessary to 
reverse its direction. To do this, the 
toggle variable X is switched to its 
opposite state. In BASIC, a variable 
is true if it has any value other than 





Oand false if 0. Also, the NOT oper- 
ator in BASIC can switch a variable 
between —1 and 0 each time it is 
used; it will toggle the variable, 
which is exactly what we need to do 
when signaling whether to move 
our alien up or down the screen, In 
the alien-moving subroutine (lines 
2000-) we add 40 (one screen line) 
and thus move the alien downward 
if X is true (— 1), The BASIC expres- 
sion IF X means “‘if X does not equal 
zero,” Conversely, the toggle vari- 
able causes the program to subtract 
40, moving the alien up the screen, 
whenever X is false (0). 


The Player Subroutine 

The player- and enemy-moving 
subroutines are similar in structure, 
but the player routine does four ex- 
tra things. It must check for key- 
presses, look for boundary 
conditions (is the player moving off 
the screen?), update and display the 
score, and make noises during any 
“hits.” In a more complex game, 
these four jobs might well lead to a 
time-hogging effect: The time spent 
in the player routine becomes sig- 
nificantly greater than the time 
spent processing the other objects 
in the game, It doesn’t happen here, 
but if it ever should, the program- 
mer would want to balance things 
out by, perhaps, inserting the task 
of scorekeeping into the enemy- 
moving routine, assigning audio ef- 
fects to another subroutine, score 
display to yet another, and so forth. 
The idea is to spread the work 
around so that nothing becomes lop- 
sided and interferes with the flow 
of the game, 

The first thing we do in the 
player subroutine is blank out the 
player character by placing a 32 
(blank) into the player’s current 
screen location. Then we check the 
keyboard by PEEKing the “last key 
pressed” location. If it’s a 47, then 
the player has depressed the < key 
to move the player down the screen. 
We discern that the player isn’t go- 








Turning A BASIC Arcade Game 


Into Machine Language 


ing off the bottom of the screen, 
and then we add 40 to the player- 
position variable (PLR) if the 
screen-bottom boundary hasn't 
been violated. 

On the other hand, if the play- 
er tries to move up using the > key, 
we make a similar boundary check 
first and then’subtract 40 from his 
position. Line 130 POKEs the play- 
er character into whatever happens 
to be his current position. Then we 
look over to the left 20 spaces and 
see if the enemy is located there. If 
so, the player has managed to line 
himself up with the enemy and gets 
a point added to his score (that’s the 
goal of the game: keep parallel to 
the enemy). PRINTing CHR$(7) 
causes a sound on the 128; making 
noise on the 64 is slightly more 
complex, so there’s no collision 
sound in this program for that com- 
puter. Finally, the cursor is sent to 
the HOME position and we print 
the current score and return to the 
main loop. 

The enemy subroutine also 
starts off by blanking the character 
and, based on the value of the tog- 
gle variable X, the enemy is moved 
up or down as appropriate. 


Same Program, 100 

Times Faster 

Now that we've dissected the 
BASIC version, here’s how it would 
translate into ML, We follow the 
structure of the BASIC version fair- 
ly closely: Matching line numbers 
indicate that the same task is being 
accomplished in both versions. 
There are some extra lines in the 
ML version because individual pro- 
gramming commands in ML are 
usually more particular than BASIC 
commands. PRINT ‘“HELLO” in 
BASIC is broken down into discrete 
steps in ML: LDA #’H:JSR $FFD2: 
LDA #’E:JSR $FFD2:LDA #'L...and 
so forth. Each letter of a word is 
separately sent to the screen. It's 
100 times faster than BASIC when 
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Great Software for [Inder $770 


Now is your chance to build your software library at a very reasonable cost! For ONLY $6.99 you can get 
software for your Commodore or Apple computer. Choose from entertainment, home management or 


education titles, 


For the Commodore 64/128 


Peale rrelnme ne eerca, 38 Home and Business Card File 
Memory Quest C39 Home Expense Manager 
Sky F C40 Home Finance Organizer 1 
Atomic 41 Home Finance Organizer 2 
Professional Gambler 42 Home Income Manager 
5 The Survival Instinet 43 Home Money Manager 
Areade Action 44 Home Property Manager 
Adventure Master C-46 Personal File Keeper 
‘A PACALIPS NOW -47 Personal Investment Manager 
Bits, Pieces and Clues, 48 Family Tree 
0) Board -49 Electronic Scheduler 
C-50 Pro Financial Organizer 
C51 Recipe Box 
C52 Tax Record Organizer 


Education Series 






























ame Challengers 
ampion 

3 Crazy Corners 

jalactic Empire Builder 


















Just Games (With a Twist!) 
C16 Land, Sea & Air Adventures C-53 Number Builder 
C17 Maze Madness! C54 Number Chaser 
C18 Peg Out (The Cribbage Game) C-55 Hide & Seek 
: ar Trek Evolution C-56 Picture This 
rrivia Quest 57 Let's Count 
C21 Open: 58Time Trucker 


C-59 Funey Face 


Golfing Royal St. George's 
€-60 Math Manor 


Alien 




































ulge—Battle for Antwerp C61 Typing Tutor 
4 Wizard & the Princess. C-62Speed Reader 
llysses & the Golden Fl Electric Book Co. 
Mission Asteroid Education Series 
Passport to London €-63 Why? 
2K Passport to Paris 64 When? 
Home Management C-65The Three Bears 
0 Vital Data Keeper C-66 Gingerbread Man 
‘SL Wordmaster Senior C-67 Baby Animals 
32 Master Word C68 Hoppy the Curious Kangaroo: 
Spreadsheet €-69 Wild Animals 


database mi >70'Tom Thumb 
S71 Was a Se 


©-72 Tough Eddie 






16 Commodore 64 Utilit 
-37 Financial Analyzers 


Plus these Super Accessories 


© Universal Blank Diskettes (for Apple or Commodore) compatible 
with any 54° disk drive. Double-notehed, DS/DD disks give 
single-sided users fice the storage at the same great price! 5: 
$6.99. Blank Diskettes: 10(V', certified, DS’ DD, Box of 10: $8.50. 
for Commodore 64/128 saree: 
©ShareData 300C™ 300 | 
Baud Modem: Autodial, 
atitoanswer, includes ter 
software: 
© Utility Cartridg 
Hions: $19.95, 
© Warp Drive Cartridge: Fast 
er loading plus more func 
tions for more efficient use 
of your computer: $19.95 


CALL TOLL-FREE 
CREDIT CARD ORDERS 




























information to: Fi 








I'm ordering the following programs: 








U.S. FUNDS ONLY 

















C1 Check or money order enclosed 





o | 


Save $1.00 on a 10-pack of DS/DD Blank Diskettes with any merchandise order over $10.00. 


For the Apple II, IIc, Ie 


Entertainment Series 

AcL_ Beginner's Cave, an Adventure 
A-2 Cave of the» 
River Adventure, an Adventure 
Fore!, Golfing Simulator 

Lady Luck 

Space Adventure 

Classic Games 

Android Invasion 
Championship Gambler 

10 Chess Champion 

A-11 Memory Quest 

‘A-13 Ulysses & the Golden Fleece 

A:15 Passport to London 

‘A-16 Passport to Paris, 


Home Management 


A-17 The Addresser—Mailing List 

A-18 Financial Planner 

A-19 General Ledger 

‘A-20Monthly Budgeter 

4-21 Nutrition Monitor 

A-22Securities Portfolio 

A-23Recipe Box 

‘A-24 Database Manager 

A-25 Disk Library 
A-26Electronic Calendar 

‘4-27Electronic Phone Book 

A-28Family Tree 

A-29Personal Spreadsheet 

).JWriter, Word Processor 
Utility Master 

‘A-32Vital Data Keeper 
3Typing Tutor 








Ad 


beNSa 


A 
A 
A 
A 
AS 
A 
















A-34Tax Record Organizer 
A-35 Checkbook Balancer 
A36JBase 


nd Grade Werewolf 





ind, an Adventure 


Education Series 

A37Mr. Math 

AB8Speed Reading 

A-dOBeginning Counting 

A-40 Counting Skills 

A-41 Addition | 

A-42, Addition II 

A-43 Addition IIL 

‘A-44 Addition IV 
Subtraction 1 

Subtraction I 

A-47Subtraction IIL 

A-48 Multiplication | 

A-49Multiplication I 

A-50 Multiplication 111 

A-51 Division 1 

A-52Division 11 

A-53 Division II] 

A-54 Division IV 

Electric Book Co. 

Education Series 

A-55Why? 

A-6When? 

A-57 The Three Bears 

A-58 Gingerbr 

A-B9Baby Ani 

‘A-60 Hoppy the Curious Kangaroo 

‘A-61 Wild Animals 

‘A-62‘Tom Thumb 

‘A-631 Was a Second Grade Werewolf 

A-64 Tough Eddie 



























plus $8.00 postage/handling 
Commodore compatible 
floppy disk drive 


‘Total number of software pkgs. 
Boxes of 5 Universal blank disks 











Boxes of 10 blank disks. x $8.50 per box. . 
300C 300 Baud Modem .95 per modem . 
Utility Cartridge x $19.95 each 


Warp Drive Cartridge 
Enhancer 2000 Disk Drive 














x $19.95 each ... 


ENHANCER 2000™ 
Disk Drive $149.95 


Please list the ordering number(s) (C-1, A-3, etc.) of the program(s) you wish to order and 
return this order form along with your check, money order or VISA/MasterCard 
line Software, P.O. Box 5297, Hopkins, MN 55343-2297. 











x $6.99 each ......$___ 
x $6.99 per box . 








x $149.95 each 





Ovisa O MasterCard ‘Total amount of order 
Card # Postage/handling (800 For Disk Drive; $200 For Software). 
! Expiration Date MN Residents add 6% state sales tax ee 
ie eae ) Total (enclose check, money order or fll in VISA/MC information at left) 
apesone: Money orders/Credit card orders shipped immediately. 
1 Name Allow 4-6 weeks for delivery for check orders. 
Firstline Software, Inc. 1 Date. 
P.O, Box 5297 ' 
Hopkins, MN 55343-2297 1 Name Address. 
" City State. Zip. 
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you run it, but ML asks the pro- 
grammer to use instructions which 
are not as general-purpose as 
BASIC instructions. 

This program will assemble as 
is if you are using the LADS assem- 
bler from one of my books. The 
game is designed for the Commo- 
dore 64 or 128, but please note the 
two changes (lines 18 and 110) nec- 
essary to adjust things for the 64. 


1 *= $300 
3.0 
4 ;(12 SPACES)SIMPLE GAME 


$3 

18 PRINT = $FFD2:OUTNUM = $ 
8E32; ($BDCD FOR C64) 

26 PLRPTR = 256:ENYPTR = 25 
2 


188 LDA #147:JSR PRINT; 
{11 SPACES]CLEAR SCREEN 
PLR = 1654:ENY = 1034:K 
E = 212 ;(203 FOR C64) 
LDA #<PLR:STA PLRPTR:LD 
A #>PLR:STA PLRPTR+1:LD 
A #<ENY:STA ENYPTR:LDA 
{SPACE} #>ENY 
STA ENYPTR+1 
NEXT LDX #24 
LOOP JSR PLAYER:JSR DEL 
AY:JSR ENEMY 
DEX:BNE LOOP 
LDA X:EOR #1:STA X 
UMP NEXT 

PLAYER LDY #6:LDA #32: 
STA (PLRPTR),Y 

LDA KE:CMP #47:BNE UP 
LDA PLRPTR:CMP #222:BE 
Q MOVE 

CLC:LDA PLRPTR:ADC #48 
:STA PLRPTR:LDA PLRPTR 
+1:ADC #0 

STA PLRPTR+1:3MP MOVE 
UP LDA KE:CMP #44:BNE 
{SPACE }MOVE 

LDA PLRPTR:CMP #30:BEQ 

MOVE 

SEC:LDA PLRPTR:SBC #48 
1STA PLRPTR:LDA PLRPTR 
+1:SBC #0:STA PLRPTR+1 
MOVE LDA #219:LDY #6:S 
TA (PLRPTR),Y 

LDY #26+LDA (ENYPTR),Y 
3CMP #32:BEQ RETURN 
INC COUNT:BNE SHOWSCOR 
E:INC COUNT+1 
SHOWSCORE LDA #19:JSR 
{SPACE }PRINT:LDA #7:JS 
R PRINT:STX XHOLD 

LDX COUNT:LDA COUNT+1: 
JSR OUTNUM:LDX XHOLD 
RETURN RTS 

ENEMY LDY #6:LDA #32:S 
TA (ENYPTR) ,Y 

LDA X:BNE UPEN:CLC:LDA 

ENYPTR:ADC #4:STA EN 
YPTR:LDA ENYPTR+1:ADC 
(sPAcE} #0 

STA ENYPTR+1:JMP MOVEE 


NY 

UPEN SEC:LDA ENYPTR:SB 
C #4@:STA ENYPTR:LDA E 
NYPTR+1:SBC #0:STA ENY 
PTR+1 

MOVEENY LDA #269:LDY # 
@:STA (ENYPTR),¥ 

RTS 

#{11 SPACES}SLOW THING 
S DOWN 


116 
lll 


112 
128 
138 
149 
158 
168 
1088 


1818 
1911 


1612 
1613 
1628 
1621 
1622 


10638 
1631 
1832 
1833 


1834 


1048 
2888 


2016 


2011 
2826 


2638 


2049 
3008 








3016 DELAY LDA #16:STA TIME 
R:LDY #0 

MORE DEY:BNE MORE 

DEC TIMER:BNE MORE:RTS 


7(11 SPACES}STORAGE AR 
EA 


3828 
3038 
4000 


4010 X .BYTE 6 

4028 TIMER .BYTE 8 
4038 COUNT .BYTE 6 @ 
4848 XHOLD .BUTE 0 


Also notice that we had to add 
a delay subroutine in lines 
3000-3030 because, without slow- 
ing down the action, no human 
could hope to play the ML version 
of the game. This is a byproduct of 
the great velocities you achieve 
when you program in ML: You 
sometimes need to deliberately re- 
tard your program or it executes too 
fast. Another way of looking at 
ML’s exceptional efficiency is that it 
gives you lots of extra time to insert 
additional variables or visual effects 
into the action of the game. You can 
add more realistic animated graph- 
ics, more enemies onscreen at the 
same time, or whatever else would 
make your game richer. Many 
things can be going on at the same 
time in an ML game—you could 
even give the enemy “intelligence” 
by having it seek out the player or 
anticipate his next move. While 
these things are possible in BASIC, 
they eventually make the anima- 
tion intolerably slow. 

Next month we'll take the ML 
version apart to learn the funda- 
mentals of action-game ML pro- 
gramming. For now, if you want to 
change its speed, just change the 10 
in line 3010 to some other value 
and reassemble the program. @ 





All programs 
listed in this 
magazine are 
available on the 
GAZETTE Disk. 
See elsewhere 
in this issue 
for details. 




















DUST COVERS 


* seo MADE TO Fi 
%& Heavy 32-0z. VINYL ANT STATIC 
* EXTENDS EQUIPMENT LIFE 
% Choice of Colors Lt, Tan or Brown 
COMPUTERS 
C-64; V 
C-128, B- 
DATASETTE 
DISK DRIVES 
ty C-1571, INDUS. oT 
S/D; APPLE S, 
Mb B/ 0; Ci Ep UNIT. 
ENHANCER 
PRINTERS 
















C-16; Plus 4 













IGA earn 
IM NBR PARI 16.01 
AMDEK COLOR 1 390/760 
TEKNIKA’ Md 10/22 1 


SMe ‘coLon™ 
VIDEO RECORDERS . 
Disenons Required) 
by ting NAME and) MODEL 
and COLOR’ CHOICE TAN or BROWN: 
Enclose check or money order plus, $1.50 
Ber ytem (4.50 max.) shipping, and handling 
alifornia Res. ‘Include & 5° ‘Sales, Tax, 
SPECIAL COVERS WILL BE MADE TO YOUR 
DIMENSIONED SKETCH. SEND YOUR RE- 
QUIREMENTS FOR OUR LOW PRICE QUOTES 


Crown Custom Covers 
9606 SHELLYFIELD RD., Dept. A 
DOWNEY, CA 90240 
(213) 862-8391 






























ro tos To 
FACTORY AUTHORIZED 


COMMODORE 
REPAIR CENTER 


1-800-772-7289 


IN ILLINOIS (312) 879-2888 


C64 Repair rao. 39.95* 
1541 Repair .... 79.95* 
1541 Alignment 

only .. eee 29.95* 
Power Supplies . 34.95 
Commodore Parts . CALL 
* Includes parts, labor & UPS return ship- 

ping, Air Freight add $10.00 


Diagnosis fee of $25.00 for any unit al- 
tered or with no defects. 


CALL BEFORE SHIPPING 
VISA, MASTER or MONEY ORDER 
SERIAL NUMBERS REQUIRED 


24-48 HRS TURN AROUND 
(Subject to Parts Availability) 


TEKTONICS PLUS, INC. 
150 HOUSTON ST. —STE. 308 
BATAVIA, IL 60510 


CLIP AND SAVE 
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TurboDisk 64 


If you've ever used a really fast disk 
drive, you know that the Commo- 
dore 1541 drive leaves something 
to be desired—namely, speed. 
True, it’s much faster than a Datas- 
sette, but it’s still annoyingly slow 
compared to other floppy disk 
drives with high-speed parallel in- 
terfaces. Now there’s a solution: 
“TurboDisk 64.” 

Once you start using Turbo- 
Disk, you'll wonder how you got 
along without it. TurboDisk turbo- 
charges the loading process by a 
factor of three times or more. In 
fact, the longer the program, the 
more improvement you'll see. 

TurboDisk requires no modifi- 
cations to your disk drive or com- 
puter. It loads programs saved in 
the usual manner; no special Turbo- 
save is required, It works with most 
BASIC and machine language pro- 
grams, including the DOS Wedge. 
It does not compromise reliability. 
And you can switch it on or off at 
any time by typing a single 
command. 

If you're still skeptical, give 
TurboDisk a try—it delivers what it 
promises. If you already have a 
copy of TurboDisk from the July 
1985 issue of the GAZETTE, or from 
that month’s GAZETTE DISK, then 
you don’t need to enter this pro- 
gram. This is not an updated ver- 
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Don Lewis 


This program is so powerful and valuable that 
we're republishing it here for those who might 
not have seen it in the July 1985 issue. Impossible 
as it seems, “TurboDisk 64” speeds up the 1541 
disk drive’s loading time 300 percent or more—in 
fact, the longer the program, the more the gain. 
Also in this issue, you'll find several programs 
which expand the power of TurboDisk: “Turbo- 
Disk Relocator” and “Turbo Boot Maker.” 


sion of TurboDisk; it’s a reprint for 
those readers who may have 
missed it the first time around. 


Preparing TurboDisk 

Since TurboDisk is written entirely 
in machine language, it must be en- 
tered with the ‘““MLX” machine lan- 
guage entry program, found 
elsewhere in this issue. Be sure that 
you read and understand the in- 
structions for using MLX before you 
begin entering the data for Turbo- 
Disk. When you first run MLX, 
you'll be asked for starting and end- 
ing addresses. The proper values 
for TurboDisk are as follows: 
Starting address: C000 

Ending address: C3BF 

You may then begin entering the 
data for TurboDisk. If you want to 
save a bit of typing, you can skip 
lines C1B8-C1F8, since this filler 
area does not contain any useful 
information. 

When you've finished entering 
the numbers, be sure to use the 
MLX Save option to make at least 
one copy of the TurboDisk data. 
You'll probably find TurboDisk so 
useful that you'll want a copy on 
every disk you use. You can use the 
MLX Save option repeatedly to 
make copies on different disks. If 
you want to put a copy of Turbo- 
Disk on a new disk at some later 








date, you can use any copy program 
or you can use MLX. To do this, 
load and run MLX, then enter the 
starting and ending addresses listed 
above, Insert a disk containing Tur- 
boDisk into the drive, then use 
MLX’s Load option to load in the 
TurboDisk data. Next, insert the 
disk on which you wish to write 
TurboDisk and use MLX’s Save op- 
tion to store the new copy. 

To load TurboDisk, use a com- 
mand of the form LOAD “TURBO- 
DISK 64”,8,1 (replace TURBODISK 
64 with whatever filename you 
used when you stored the Turbo- 
Disk data). Next, type NEW and 
press RETURN to reset important 
memory pointers, then SYS 49152 
to activate the program. The mes- 
sage TURBODISK ACTIVATED 
signals that you're ready for high- 
speed loading. 


Turbocharged LOADs 

Once TurboDisk is activated, no 
special commands are necessary. 
Just type LOAD “‘filename’’,8 or 
LOAD‘filename’’,8,1 as usual. 
You'll be amazed at the difference. 

One thing you'll notice imme- 
diately is that the red light on the 
disk drive doesn’t come on at all 
during a Turboload. Don’t panic; 
this is normal. It’s also normal for 
the 64’s screen to blank out as 
TurboDisk works. When the pro- 
gram is loaded, the screen reap- 
pears unaltered. 

You may occasionally find it 
necessary to deactivate TurboDisk 
and use a normal LOAD instead. 
For example, 1541 disk drives are 
prone to head-alignment problems, 
so if you have a disk formatted on a 
drive other than your own, you 
may find that your drive has diffi- 
culty loading programs from it. 
Since the Turboload routine gives 
up more easily on difficult LOADs, 











you may have to switch to the more 
forgiving standard LOAD to get the 
program into your computer. You 
can switch off TurboDisk at any 
time without erasing it from memo- 
ry by entering SYS 49155 (you 
should see the message TURBO- 
DISK DISABLED). To reactivate 
TurboDisk, enter SYS 49152. 

You'll also find it necessary to 
use the SYS to reactivate TurboDisk 
after pressing RUN/STOP-RE- 
STORE, which effectively discon- 
nects TurboDisk. 

TurboDisk resides in the 4K 
block of free memory starting at ad- 
dress 49152 (hex $C000), so it’s 
completely safe from BASIC. How- 
ever, many other machine language 
programs or subroutines also use 
this memory space and may over- 
write TurboDisk. Don’t attempt to 
use TurboDisk to load any program 
which occupies locations 49152- 
50431 ($C000-$C4FF). If the pro- 
gram you wish to Turboload uses 
this area of memory, you can use 
“TurboDisk Relocator,”” found else- 
where in this issue. 

TurboDisk speeds up LOADs, 
but it can’t speed up SAVEs or 
VERIFYs. It also doesn’t affect the 
speed of disk file handling with 
OPEN, PRINT#, GET#, and so 
forth, It’s not compatible with cer- 
tain features of some programs, 
such as loading text files with 
SpeedScript, although you can use 
TurboDisk to load SpeedScript in 
the first place. It also may not work 
with some commercial software. 


How TurboDisk Works 
The machine language for Turbo- 
Disk is unusual in that only half of 
it works within your computer— 
the rest is actually executed within 
the 1541 drive itself. Commodore 
disk drives are intelligent units, 
containing their own microproces- 
sors, RAM, and ROM. This means 
that they can be programmed for 
special effects, like turboloading. 
During the brief delay you no- 
tice between the time you enter the 
LOAD command with TurboDisk 
and the time the drive starts spin- 
ning, 444 bytes of machine lan- 
guage are transferred from the 
computer to the drive’s RAM. In the 
64, it is stored in locations 49664—- 
50107 ($C200-$C3BB). This re- 
quired transfer of data before each 
Turboload adds a certain amount of 





overhead time, which explains why 
TurboDisk gives less speed im- 
provement for short programs. 

TurboDisk operates by chang- 
ing the ILOAD vector at locations 
816-817 ($330-$331) to point to it- 
self, bypassing the normal LOAD 
routines in ROM. TurboDisk first 
checks to see whether a disk direc- 
tory (LOAD “$”,8) or a VERIFY 
was requested, In either of these 
cases, control is returned to the 
ROM routines for normal process- 
ing. If a program LOAD was re- 
quested, the routine adds the 
filename to the code for the disk 
drive portion, then transfers that 
data to the drive’s memory. 

The portion of TurboDisk in 
the disk drive uses routines in the 
drive’s ROM to locate the desired 
program and read it from the disk 
sector by sector. To improve speed, 
routines like the one that turns on 
the red light are omitted, and only 
the essential ones are used. The 256 
bytes of data from each disk sector 
are transferred two bits at time to a 
256-byte buffer within the computer. 
In the 64, this buffer is at locations 
50176-50431 ($C400-$C4FF). 

TurboDisk machine language 
in the computer reads the incoming 
data from the serial port’s DATA 
and CLK lines, instead of just the 
DATA line as in normal serial data 
transfers. Thus, TurboDisk tempo- 
rarily converts your serial bus into a 
two-bit parallel bus. When the en- 
tire 256 bytes from a disk sector 
have been transferred into the com- 
puter’s buffer, data from the buffer 
is added to the program in memory 
while the drive is reading the next 
sector from the disk. 


Just How Fast Is It? 
Despite a few limitations, Turbo- 
Disk is one of the most valuable 
general-purpose utilities a disk user 
can own. To discover exactly how 
fast it is, we ran some tests. The 
results, below, demonstrate how 
TurboDisk yields the most im- 
provement with medium to long 
programs. (Results with different 
disk drives may vary.) 

Blocks Normal Turbo- Factor 


LOAD load 
Program1 31 21sec 7sec 30 
Program2 17 13sec 5sec 26 
Program3 45 31sec 9sec 3.4 
Program4 8 7sec Ssec 14 
Program5 25 18sec 6sec 3.0 
Program 6 122 75sec 17sec 4.4 





Special Note To 128 Owners 
For those 128 owners who use a 
1541 disk drive: When you’re in 64 
mode, you can load and run Turbo- 
Disk 64 as listed. For 128 mode 
(and a 1541), see “TurboDisk 128” 
elsewhere in this issue. 

If you own a 1571 disk drive, 
you don’t need a Turbo program 
while you're in 128 mode—the 128 
and 1571 are capable of using the 
fast serial transfer hardware built 
into the disk drive and computer. 
The 128/1571 combination is twice 
as fast as TurboDisk at its best, and 
about eight times faster than the 
1541 alone. The 1571 slows down 
to the 1541's sluggish pace when 
you're in 64 mode, however. To 
speed up the 1571/64 mode combi- 
nation, you can use TurboDisk 64. 
But first you must tell the 1571 to 
act like a 1541 with the following 
line: 

OPEN 15,8,15, “U0>M0": CLOSE 15 


To go back to 1571 operations, 
change the second zero to a one 
(“U0>M1"). However, you must 
make a decision, You can use dou- 
ble-sided disks while the 128 is in 
64 mode and the drive is in 1571 
mode, but not while using Turbo- 
Disk 64, Or you can use TurboDisk 
to speed up the 1571 drive in 1541 
mode, but then you cannot use 
both sides of a disk. It’s up to you: 
fast operations limited to one side 
of the disk or slow loads and access 
to both sides of a disk. 


See program listing on page 97. @ 





Note to readers outside North 
America: High-speed Turbo- 
Disk data transfers rely on pre- 
cise timing, so the program may 
fail to operate on systems that 
use the European PAL video 
system instead of the North 
American NTSC system. The 
reason is rather technical—64s 
with PAL video use a slightly 
different microprocessor clock 
frequency. To. compensate for 
this, an Australian reader sub- 
mitted a modification which ap- 
peared in the January 1986 
“Bug-Swatter” column. If Tur- 
boDisk will not operate proper- 
ly with your PAL video 64, try 
changing the following lines as 
shown: 


C190:8D 8 DD A2 84 CA DO FD AB 
C19B:EA A2 64 AD OB DD BA BB 29 
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TurboDisk Relocator 


Commodore 64. 


“TurboDisk 64” is an excellent util- 
ity program that radically speeds up 
the 1541 for load operations. Since 
TurboDisk may be activated in pro- 
gram mode, it can be incorporated 
quite easily with other programs, 
The only drawback is its location in 
memory—$C000 or 49152, quite a 
popular spot for other machine lan- 
guage programs. You may often find 
yourself forced to use a normal load 
because the program you want to 
turboload is at that same address. 
Because of the numerous 
memory configurations available 
on the 64, many programs are writ- 
ten as modules, When the main pro- 
gram is executed, it in turn loads in 
other modules such as machine lan- 
guage routines, hi-res screens, and 
so on. All the modules required are 
loaded in only once when the pro- 
gram is first run, TurboDisk (in pro- 
gram mode) is also needed only 
once at the beginning of the module 
loading. By being able to relocate 
TurboDisk, we could put it in 
BASIC RAM (or wherever we want) 
and not worry about it being over- 
written, because once the modules 
are loaded, we can deactivate it 
since it’s no longer needed. Care, 
however, must be taken to relocate 
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Dino Bavaro 


“TurboDisk 64” becomes a more versatile and 
powerful utility when used with this short 
program. Now you can use TurboDisk 64 with 
most any machine language program. For the 


TurboDisk to an area of memory 
which does not conflict with the 
modules being loaded. 


User’s Choice 

The program accompanying this ar- 
ticle, ‘’TurboDisk Relocator,’”’ al- 
lows you to select the area of 
memory for TurboDisk, The DATA 
statements in this program reflect 
the key memory locations that have 
to be altered whenever TurboDisk 
is relocated to a different area of 
memory. To use the program, just 
type it in and run it. The program 
prompts you for a new program 
name to be assigned to the new ver- 
sion. I find it helpful to append the 
program’s starting address to the 
end of the program name. If you 
were creating a TurboDisk version 
to be executable at location 4096, 
you could name it “ TBDISK.4096”. 
This makes things easier, especially 
if you have other versions of Turbo- 
Disk that execute at different loca- 
tions. 

The program prompts you to 
enter the memory address of where 
to assemble the new version of Tur- 
boDisk. You should respond with a 
decimal address on a full-page 
boundary (that is, an even multiple 





of 256). It’s advisable not to select 
memory areas under ROM or other 
key memory pages such as addresses 
below 2048. 

Once the program knows the 
address of where to locate the new 
TurboDisk version and the new 
name, it proceeds to read the origi- 
nal version from disk and write a 
new version modified for the speci- 
fied starting address back to the 
same disk. (Be sure the name you 
use for the new version is not al- 
ready used by another file on the 
disk.) 

To activate the new version, 
use a SYS statement to the new 
starting address you selected. For 
example, if you created a version of 
TurboDisk relocatable to address 
32768, then you would start it with 
SYS 32768 (in either program or di- 
rect mode). To deactivate the new 
version, SYS to the address three 
bytes beyond the new starting ad- 
dress, For the example of starting at 
32768, you could use SYS 32768 + 
3 (or just SYS 32771). To incorpo- 
rate TurboDisk into one of your 
programs which loads modules, you 
can use the following technique. 

1 ON A GOTO 35,6 

2 A=1:LOAD “TBDISK.32768",8,1: REM 
LOAD TBDISK VERSION 32768 

3 SYS 32768: REM ACTIVATE 
TURBODISK 

4 A=2:LOAD “HI-RES SCREEN",8,1 

5 A=3:LOAD “ML-SORT”,8,1 

6 SYS 32768+3: REM DEACTIVATE 
TURBODISK 

7 REM REST OF PROGRAM 


See program listing on page 102. @ 








Turbo BootMaker 


Bert Rozenberg 


This program makes “TurboDisk 64” even more 
useful, It creates a boot program that lets you load 
any program at turbo speed—without using Turbo- 
Disk. And after turboloading, it automatically 
runs. For the Commodore 64 and 1541 disk drive. 


One of my favorite programs from 
COMPUTE!’s GAZETTE is “TurboDisk”’ 
for the Commodore 64. It greatly 
speeds up the loading time of the 
ordinarily slow 1541 disk drive. To 
enhance the use of this excellent 
utility, I wrote “‘Turbo BootMaker,” 
which lets you autoboot your pro- 
grams at turbo speed without load- 
ing TurboDisk. 


Making The Boot 
After typing in Turbo BootMaker, 
save a copy. To use it, load it and 
type RUN, (If you’re using Turbo- 
Disk, be sure to disable it before you 
run Turbo BootMaker.) The screen 
prompts make the program very 
easy to use. First, insert your disk 
with a copy of TurboDisk, (Ed. note: 
Turbo BootMaker works with any ver- 
sion of TurboDisk—July 1985 Ga- 
ZETTE, April 1985 COMPUTE!, or 
“TurboDisk 64,” elsewhere in this is- 
sue. It also works with versions creat- 
ed using “TurboDisk Relocator,” also 
in this issue.) You're asked to enter 
the TurboDisk filename (the name 
you used to save it on your disk). Be 
sure to use an appropriate version 
of TurboDisk. The normal version 
works for turbobooting BASIC pro- 
grams and some machine language 
(ML) programs. However, it cannot 
be used to turboboot ML programs 
that load at its own address, 49152 
($C000 hexadecimal), To turbo 
boot an ML program that resides at 
49152, you must use a version of 
TurboDisk that resides elsewhere 
in memory. The “TurboDisk Relo- 
cator’’ program elsewhere in this is- 
sue lets you create versions of 
TurboDisk that can work from oth- 
er memory locations. After you en- 
ter the filename, there will be a 
short delay as the TurboDisk file is 
read into memory. 

You're then asked to insert the 





disk on which you wish to create 
the turbobooter file. The next 
prompt asks for the filename of the 
program you want to turboboot. (If 
you press RETURN only at this 
prompt, the wildcard (*) character 
will be used as the filename.) If a 
copy of that program is not already 
present on the disk, you'll be re- 
minded to add a copy after you fin- 
ish creating the turbobooter. Turbo 
BootMaker does not alter the pro- 
gram to be turbobooted; instead, it 
creates a file that automatically 
loads TurboDisk, then turboloads 
the specified program and starts it 
running. A copy of the program to 
be turbobooted must be on the 
same disk as the turbobooter file. 
That copy can always be loaded 
and run normally independently of 
its associated turbobooter file. 
You're asked if the program to 
be turbobooted is BASIC or ML 
(machine language). Press B or M. If 
it's ML, you're asked for the start- 
ing address, which can be entered 
in either decimal or hexadecimal 
(you must precede hex values with 
a $). For example, if the command 
to start the program is SYS 49152, 
you can answer the starting address 
prompt with either 49152 or $C000. 
You should note that many of the 
major machine language programs 
published in the GAZETTE are de- 
signed to be loaded and run as if 
they were BASIC. Such programs 
usually start at address 2049 
($0801); examples include Speed- 
Script, ‘‘SpeedCheck,”” and ‘’Ad- 
dress Cataloger” (in this issue). For 
these programs you should select B 
(BASIC), not M (machine lan- 
guage), at this prompt. If you select 
Mand specify 2049 or $0801 as the 
starting address, the program will 
crash after loading. As a rule, if you 
start a program with RUN, select 





option B; if you start it with a SYS, 
select option M. 

Last, you're prompted to give a 
filename to the new turbobooting 
program (do not use the wildcard 
convention), It would be wise to 
use a filename which indicates that 
this is a turbobooter file, and which 
program it turboboots. For ex- 
ample, you might use the name 
SS.TBOOT for a file which turbo- 
boots SpeedScript. After you enter 
the filename, there will be another 
short delay as the turbobooter file is 
written to disk. 

At this point, you've created a 
boot program that will automatical- 
ly load the specified program at tur- 
bo speed every time you run it. It 
also runs the program after it’s been 
loaded. You don’t need to have 
TurboDisk on the same disk—all 
you have to do is LOAD “‘file- 
name’’,8,1 (be sure to include the ,1) 
where filename is the name of the 
turboboot file you created with the 
procedure described above, 

There are a few things you 
should note about using the turbo- 
booter file. First, the screen will ap- 
pear to fill with garbage characters 
for a second or two after you enter 
the LOAD command. Don’t panic; 
this is normal, and the screen is 
cleared when the turboload begins. 
Second, even though the turbo- 
booting process usually is a good 
deal faster than a regular LOAD, it 
isn’t quite as fast as turboloading 
directly with TurboDisk already in 
memory. This is because the turbo- 
booter must load the TurboDisk 
machine language before it can tur- 
boload the program. However, 
you'll probably find that the 
convenience of having your pro- 
grams start automatically out- 
weighs the slight speed decrease. 
Finally, when turbobooting ma- 
chine language programs like ““Me- 
taBASIC” that are designed to be 
used in conjunction with BASIC, 
you must remember to type NEW 
and press RETURN after the turbo- 
boot is finished so that important 
memory pointers will be reset. 

See program listing on page 99. @ 
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TurboDisk 128 


If you've upgraded to a Commo- 
dore 128 from a VIC-20 or 64 and 
are still using a 1541 disk drive, 
you're probably envious of those 
fellow 128 owners whose 1571 
drives can load programs in the 
blink of an eye. Perhaps you've 
used “’TurboDisk 64” in 64 mode 
and wished for an equivalent 
speedup for 128 mode. Here’s the 
answer: ‘‘TurboDisk 128, a new 
and improved version specifically 
for the 128/1541 combination. 

TurboDisk 128 works only in 
128 mode; you'll still need to use 
TurboDisk 64 in 64 mode. And the 
program works only with a 1541; it 
isn’t useful in conjunction with a 
1571. If you own a 1571 disk drive, 
you don’t need a Turbo program 
while you're in 128 mode: The 128 
and 1571 can use the fast serial 
transfer hardware built into both 
disk drive and computer, which is 
as much as eight times faster than a 
standard 1541—about twice as fast 
as TurboDisk. 

But even if TurboDisk 128 
doesn’t permanently cure your de- 
sire for a 1571, it will make your life 
with the 1541 more bearable. In 
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Don Lewis 


Are you using a 1541 disk drive with your Com- 
modore 128? Here’s a powerful utility that can 
reduce the time you spend waiting for programs 
to load by 300 percent or more. 


fact, once you start using Turbo- 
Disk, you'll wonder how you got 
along without it. TurboDisk turbo- 
charges the loading process by a 
factor of three times or more. In 
fact, the longer the program, the 
more improvement you'll see. Like 
TurboDisk 64, the 128 version re- 
quires no modifications to your disk 
drive or computer. It loads pro- 
grams saved in the usual manner; 
no special Turbosave is required. It 
works with most BASIC and ma- 
chine language programs. It does 
not compromise reliability. And 
you can switch it on or off at any 
time by typing a single command. 


Typing It In 

Since TurboDisk is written entirely 
in machine language, it must be en- 
tered with the new 128 version of 
our “MLX” machine language en- 
try program, which makes its debut 
elsewhere in this issue. Be sure that 
you read and understand the in- 
structions for using MLX before you 
begin entering the data for Turbo- 
Disk. When you first run MLX, 
you'll be asked for starting and end- 
ing addresses. The correct values 
are as follows: 





Starting address: 1300 
Ending address: 16CF 
Now you may begin entering the 
data for TurboDisk. When you've 
finished entering the numbers, be 
sure to use the MLX Save option to 
make at least one copy of the Tur- 
boDisk data. You'll probably find 
TurboDisk so useful that you’ll 
want a copy on every disk you use. 
You can use the MLX Save option 
repeatedly to make copies on differ- 
ent disks. If you want to put a copy 
of TurboDisk on a new disk at some 
later date, you can use any copy 
program or you can load an existing 
copy of TurboDisk, place the disk 
on which you wish to store the new 
copy of TurboDisk in the drive, and 
use a command of the form BSAVE 
“filename’’,BO,P4864 TO P5839. 
To load TurboDisk, use a com- 
mand of the form BLOAD “TUR- 
BODISK 128’:SYS DEC(‘'1300"’) 
(replace TURBODISK 128 with 
whatever filename you used when 
you stored the TurboDisk data). 
The message C128 TURBODISK 
ENABLED signals that you're ready 
for high-speed loading. 


Turbo LOADS 

Once TurboDisk is activated, no 
special commands are necessary. 
Just type LOAD “‘filename’’,8 or 
DLOAD “filename” or BLOAD“file- 
name” as usual. You'll be amazed at 
the difference, 








One thing you'll notice immedi- 
ately is that the red light on the disk 
drive doesn’t come on at all during a 
turboload. Don’t panic; this is nor- 
mal. It’s also normal for the 40- 
column screen to blank while 
TurboDisk works. When the pro- 
gram is loaded, the screen reappears 
unaltered. 

You may occasionally find it 
necessary to deactivate TurboDisk 
and use a normal LOAD instead. For 
example, 1541 disk drives are prone 
to head alignment problems, so if 
you have a disk formatted on a drive 
other than your own, you may find 
that your drive has difficulty loading 
programs from it. You can switch off 
TurboDisk at any time without eras- 
ing it from memory by entering SYS 
DEC(‘1303”), or the equivalent SYS 
4867. You should see the message 
C128 TURBODISK DISABLED. To 
be safe, it would be wise to include a 
BANK 15 before the SYS to ensure 
that the system is in its normal 
BASIC configuration. To reactivate 
TurboDisk, enter SYS DEC(1300”), 
or the equivalent SYS 4864 (again, it 
would be wise to precede this with a 
BANK 15). You should see the mes- 
sage C128 TURBODISK ENABLED 
to indicate that turboloading is now 
available. 

You'll also find it necessary to 
use the SYS to reactivate TurboDisk 
after pressing RUN/STOP-RE- 
STORE, which effectively discon- 
nects TurboDisk. 

TurboDisk resides in the cur- 
rently unused area of free memory 
starting at address 4864-5839 (hex 
$1300-$16CF), so it’s completely 
safe from BASIC. However, this 
memory area is rapidly becoming 
popular with 128 machine language 
programmers and you may find oth- 
er programs that use these locations. 
Such programs cannot be used with 
TurboDisk because loading them 
will overwrite the TurboDisk pro- 
gram. Turbodisk also uses the block 
of memory at 3072-3327 ($0C00- 
$OCFF) as a buffer for the data read 
from disk. This area is the RS-232 in- 
put buffer, but since the 128 can’t 
turboload and receive RS-232 input 
simultaneously, this dual usage 
should cause no conflict. However, 
you should be aware that some pro- 
grammers use the RS-232 buffers for 
machine language routines. Such 
routines cannot be used with Turbo- 
Disk. 

TurboDisk speeds up LOAD, 





DLOAD, BLOAD, and the moni- 
tor’s L command, but it can’t speed 
up SAVE or VERIFY. It also doesn’t 
affect the speed of disk file han- 
dling with PRINT#, GET#, and so 
forth, It’s not compatible with cer- 
tain features of some programs and 
may not work with some commer- 
cial software. 


How It Works 

The machine language for Turbo- 
Disk is unusual in that only half of 
it works within your computer— 
the rest is actually executed within 
the 1541 drive itself. Commodore 
disk drives are intelligent units, 
containing their own microproces- 
sors, RAM, and ROM. This means 
that they can be programmed for 
special effects, like turboloading, 

During the brief delay you no- 
tice between the time you enter the 
load command and the time the 
drive starts spinning, 464 bytes of 
machine language are transferred 
from the computer to the drive's 
RAM. In the 128, this data is stored 
in locations 5376-5839 ($1500- 
$16CF). This required transfer 
before each turboload adds a cer- 
tain amount of overhead time, 
which explains why TurboDisk 
gives less speed improvement for 
short programs. 

The 128-resident portion of 
TurboDisk operates by changing 
the ILOAD vector at locations 
816-817 ($330-$331) to point to it- 
self, bypassing the normal LOAD 
routines in ROM. TurboDisk first 
checks to see whether a disk direc- 
tory or a verify operation was re- 
quested. In either of these cases, 
control is returned to the ROM rou- 
tines for normal processing. If a 
program load was requested, the 
routine adds the filename to the 
code for the disk drive portion, then 
transfers that data to the drive's 
memory. 

The portion of TurboDisk in 
the disk drive uses routines in the 
drive’s ROM to locate the desired 
program and read it from the disk 
sector by sector. To improve speed, 
routines like the one that turns on 
the red light are omitted, and only 
the essential ones are used. The 256 
bytes of data from each disk sector 
are to a 256-byte buffer within the 
computer. As mentioned above, this 
buffer is at locations 3072-3327 
($0C00-$0CFF). TurboDisk sends 





data over both the DATA and CLK 
lines on the serial port, instead of 
just the DATA line as in normal se- 
rial data transfers. Thus, TurboDisk 
temporarily converts your serial bus 
into a two-bit parallel bus. When 
the entire 256 bytes from a disk sec- 
tor have been transferred into the 
computer's buffer, data from the 
buffer is added to the program in 
memory while the drive is reading 
the next sector from the disk. 


The Longer, The Faster 
Despite a few limitations, Turbo- 
Disk is one of the most valuable 
general-purpose utilities a disk user 
can own. To discover exactly how 
fast it is, we ran some tests. The re- 
sults, below, demonstrate how Tur- 
boDisk yields the most improve- 
ment with medium to long 
programs. (Results with different 
disk drives may vary.) 


Blocks Normal Turboload Factor 
LOAD (seconds) 


(seconds) 
Program 7 7 3 2.33 
Program 2 16 13 4 3.25 
Program 3 28 20 6 3.33 
Program 4 55 40 10 4.00 
Program 5 138 4 235 3.76 


Note to readers outside North 
America: High-speed Turbo- 
Disk data transfers rely on pre- 
cise timing, so the program 
may fail to operate on systems 
that use the European PAL vid- 
eo system instead of the North 
American NTSC system, The 
reason is rather technical— 
128s with PAL video use a 
slightly different microproces- 
sor clock frequency. An Austra- 
lian reader submitted a 
modification to compensate for 
this in the Commodore 64 ver- 
sion. Since we do not have ac- 
cess to a 128 with PAL video 
for testing, we cannot guaran- 
tee that the same modification 
will work in the 128 version, 
but if TurboDisk 128 will not 
operate properly with your 
PAL video system you can try 
changing the following line: 


1468:A2 04 CA D@ FD EA A2 04 2E 











See program listing on page 97. @ 
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or MPS-802 printer. For 
Plus/4, 16, and VIC-20, 


The Commodore 1526 and MPS-802 
printers offer very good print quali- 
ty. They also offer the programmer 
precise control over the spacing of 
the printed lines. This spacing is 
easily changed with this single line: 
OPEN 6,4,6:PRINT#6,CHRS(J):;CLOSE 6 


The value of J determines the 
line spacing, A value of 36 results in 
normal spacing on the MPS-802. 
(The printer divides an inch into 
216 segments, so the usual spacing 
of six lines per inch translates to 
36/216 spacing from the bottom of 
one character to the bottom of the 
next.) The smaller the value of J, the 
smaller the line spacing. A value of 
0 results in no linefeed at all—the 
lines will overlap, printing one on 
top. of another. By changing the 
spacing to a small value (1 or 2) and 
printing the same line twice, one 
can get very well-defined character 
print quality, The two lines overlap, 
but one is slightly lower (1/216 
inch). This overlap allows the char- 
acters to be more fully formed and 
darker. 

While this method is fine for 
one or two lines, it gets quite te- 
dious with any more. “Boldface” 
automates this process. It takes any 
sequential text file and prints it out 
with this improved character quality. 

Boldface is very easy to use; 
just type it in and RUN it. Type in 
the name of your sequential file 
when prompted. Be certain that your 
printer is turned on before pressing 
RETURN. To print a sequential file 


70 COMPUTE!'s Gazette August 1986 





Boldface 


Thomas Carlson 


This seven-line program offers an added dimen- 
sion—a boldface font—to your Commodore 1526 


the Commodore 128, 64, 


from tape instead of disk, you'll 
need to change line 20 to 


OPEN 4,4,7; OPEN 6,4,6: OPEN 8,1,0,FF$ 


Converting To Sequential Files 

If you want to print program list- 

ings in bold, you'll first have to con- 

vert the listing to a sequential file. 

You can do this using 

OPEN 8,8,8, “0:filename,S,W": CMD 
8,"title”: LIST 

for disk (be sure you have a format- 

ted disk in the drive before entering 

the command), or 

OPEN 8,1,1, “filename”: CMD 8,“title”: 
LIST 


for tape. After the cursor reappears, 
type the following: 


PRINT#8: CLOSE 8 


and press RETURN. If you were 
writing to disk, the drive should 
stop spinning and the busy light 
should go out. Your listing is now a 
sequential file—with the filename 
you chose—ready to be printed out 
with Boldface. 

Many word processors, like 
Easy Script, automatically format 
text into sequential files. Some oth- 
er word processors, like SpeedScript 
and WordPro, create program files 
containing screen codes instead of 
character codes, But it’s not difficult 
to convert these. WordPro, for ex- 
ample, has a way to save the file to 
disk in ASCII format (see your 
manual). 


In SpeedScript 3.0 and higher, 








you can load a document and then 
press SHIFT-CTRL-P. Answer the 
Print to: prompt with D for disk 
(SpeedScript cannot print to tape), 
then type in a filename for the text. 
Your text will be written to a se- 
quential (SEQ) disk file as character 
codes, Version 1 or 2 of SpeedScript 
does not allow printing to the disk, 
so you'll have to use the file con- 
verter program from the “Speed- 
Script Revisited” article in the May 
1984 issue of COMPUTE!’s GAZETTE. 


Modifications For 1526 
Because the earlier 1526s used 
slightly different spacings from the 
later models of the 1526 (and the 
MPS-802), some modifications may 
be needed. The first thing to check 
is the print quality. In line 50, the 
number following the first CHR$ 
(currently 1) determines this, Cre- 
ate a short test file and print it out 
several times using Boldface, each 
time using a different number in 
line 50 (between 0 and 4 is an ac- 
ceptable range). Keep whichever 
number gives the best quality. Now 
the spacing between lines must be 
adjusted. The number following 
the second CHR$ in line 50 (cur- 
rently 17) determines this, Print 
your test file and see how closely it 
matches the spacing your printer 
normally uses. If the spacing with 
Boldface is too wide, then decrease 
the value of 17 in line 50. If it’s too 
narrow, then increase the value of 
17. Then make another test print- 
out and continue changing the val- 
ue in line 50 until the spacing with 
Boldface is the same as your printer 
usually prints. When you achieve 
the results you want, your version 
of Boldface should be saved to disk 
or tape. It’s now ready to use. 


See program listing on page 101, @ 








KeyDef 


A. F. Shephard 


With this short utility for the Commodore 128, 
you can redefine any—or all—of the keys to print 
whichever character you choose. 


The Commodore 128 is a highly 
versatile and powerful machine— 
windows, high- resolution graph- 
ics, 40- or 80-column displays, re- 
definable function keys, and more. 
But it suffers from a few shortcom- 
ings. For example, the numeric key- 
pad is almost useless for DATA 
statements because there is no com- 
ma, unless you use the KEY state- 
ment to redefine one of the function 
keys, Wouldn’t it make more sense 
to change the period to a comma? 
Unfortunately, KEY acts only on 
the function keys. But ‘“‘KeyDef’”’ 
lets you redefine any key on the 
keyboard, and gives you access to 
six completely different keyboards. 


Scanning For A Code 

To understand how this is possible, 
you need to understand how the 
128 determines which character to 
display when a key is pressed. 
Here’s a short synopsis: The com- 
puter interrupts its normal opera- 
tions 60 times per second to 
perform housekeeping chores. One 
of these chores is checking to see 
whether a key is pressed. This pro- 
cess, called the keyscan, involves 
checking each key in sequence to 
see if it is pressed. The 88 keys are 
arranged electrically in a matrix as 
eight rows of 11 columns. Each key 
has a keycode that reflects the key’s 
position within the matrix. Only 
one keycode is returned per key- 





scan; if more than one key is 
pressed, the value returned will be 
that for the key with the higher 
keycode. Keycodes range from 
0-87; if no key is pressed, the key- 
scan routine returns the value 88. 
You can find the keycode for most 
keys by running this one-line 
program: 

10 PRINT PEEK(213): GOTO 10 


Following is a complete list of key- 
codes. 


If you're familiar with the 
128’s character (ASCII) codes, it 
will be obvious that the keycodes 
don’t have any direct relationship 
to the character codes for the corre- 
sponding letters and numbers on 
the faces of the keys, so you may be 
wondering how the 128 translates 
the keycode into a character code. 
Note that none of the shift keys 
(SHIFT, Commodore, CONTROL, 
ALT, or CAPS LOCK) appears in 
the keycode table. Instead, the 
keyscan routine checks these keys 
to select one of six translation ta- 
bles. The keycode is then used as an 
index to the table to find the equiv- 
alent character code for the key be- 
ing pressed. For example, suppose 
SHIFT-N is pressed; the keyscan 
routine will select the SHIFT trans- 
lation table and read the 39th value 
in the table as the value for SHIFT- 
N (the keycode for N is 39). 

To determine the addresses of 





the translation tables, the 128 
maintains a set of six pointers in 
memory. (A pointer consists of two 
consecutive memory locations that 
together hold an address in the 
standard low-byte/high-byte for- 
mat.) The pointers to the keyboard 
translation tables are found on page 
3 of the 128’s memory: 

830-831 ($033E-033F) standard (unshifted) 
832-833 ($0340-0341) SHIFT 

834-835 ($0342-0343) Commodore 

836-837 ($0344-0345) CTRL 

838-839 ($0346-0347) ALT 

840-841 ($0348-0349) CAPS LOCK 

On powerup or reset, these lo- 
cations are initialized to point to ta- 
bles in ROM. The pointers can be 
changed to point to customized ta- 
bles in RAM, however, and that’s 
just what KeyDef does. It copies the 
usual values from the ROM tables 
down to a free area of RAM memo- 
ry and then changes the pointers to 
point to the new tables in RAM. By 
POKEing new ASCII codes into the 
relocated tables, the keyboard can 
be redefined. 

Each of the translation tables 
contains 89 bytes; the first 88 bytes 
in the table each correspond to one 
keycode, while the last byte is the 
value. returned if no key is pressed. 
There are actually only five differ- 
ent tables in ROM. The ALT-key 
pointer starts out with exactly the 
same value as the unshifted-key 
pointer, which explains why ALT 
doesn’t seem to do anything. How- 
ever, KeyDef sets up a separate ta- 
ble for ALT, so it can now have 
definitions completely independent 
of the unshifted key definitions. 
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- Commodore 128 Keycodes 


5 
g 


R/HOME 51 


ee Ze SSo0Ur-@OCKmOn jo@roent 
WZ, 
“ 


CRSR left/right 2 
FL NY 4 


Using The Program 
KeyDef is written entirely in BASIC 
so there are no special instructions 
for typing it in. Just remember to 
save a copy before running it. 
After a brief pause, during 
which the key definitions are cop- 
ied from the translation tables in 
ROM down to a free area of RAM 
memory, KeyDef prompts you to 
enter the key you wish to redefine. 
Press the appropriate key. Next, 
you're asked for the table in you 
wish to redefine the key (unshifted, 
SHIFT, Commodore, CTRL, ALT, 
or CAPS LOCK), You are then told 
the current ASCII (character) code 
value of the key in the selected ta- 
ble. Finally, you’re prompted to en- 
ter the new character code for the 
key. If you're unfamiliar with Com- 
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ZPONG 


& 


iST/DEL 0 
SU) 


N/STOP 


oRmMOR seme ma gM pen m on 
gS 


CRSR up/down 
Space 
F3 


modore’s character codes, look in 
Appendix E of the System Guide. 
Unfortunately, this table was cop- 
ied verbatim from the 64 User’s 
Guide, and some of the character 
codes between 0 and 32 are incor- 
rect. For a more accurate list of these 
codes, see Appendix I, CTRL-G 
(code 7), for example, produces a 
bell tone. It’s listed in Appendix I, 
but not in Appendix E. 

There are some tricky keys we 
need to mention. One is NO 
SCROLL—you must press it twice 
for KeyDef to recognize it when it 
asks Which Key? After that, it func- 
tions as you want it to, Also, the 
current function key definitions are 
stored and erased at the beginning 
of KeyDef, then restored at the end. 
Thus, to keep your function keys 





definitions intact, do not quit Key- 
Def with RUN/STOP-RESTORE. 
HELP and SHIFT-RUN/STOP are 
normally character codes 132 and 
131, respectively. These can also be 
moved around the keyboard. RUN/ 
STOP is odd. Press SHIFT with it if 
you want to redefine it. Notice that 
the numeric keypad numbers are 
different from those on the top of 
the keyboard, even though normal- 
ly they act the same. The set of cur- 
sor keys at the top of the keyboard 
also has different keycodes from 
the pair at the bottom, so the two 
sets can be independently re- 
defined. 

If you need to recopy the stan- 
dard keyboard definitions to set 
things back to normal after KeyDef 
is first run, exit the program and 
type RUN 20. Should you wish to 
save a set of definitions, the proce- 
dure is easy. Just enter the follow- 
ing commands: 

BSAVE “filename1”,B0,P5888 TO P6422 
BSAVE “filename2",B0,P830 TO P842 


These redefinitions can be reloaded 
with these commands: 


BLOAD “filename1” 
BLOAD “filename2” 


The KeyDef program doesn’t 
need to be present in memory once 
you've used it to make the new def- 
initions. The tables that are 
BLOADed are sufficient to redefine 
the keyboard. The computer auto- 
matically handles the keyscanning 
and character translation, However, 
you must take some care when 
changing the pointers to the trans- 
lation tables. Before you change the 
pointers, the addresses to which 
you redirect the pointers must con- 
tain valid translation tables (which 
is why you must BLOAD the tables 
before you BLOAD the vector val- 
ues). Otherwise, you won't be able 
to type on the keyboard because the 
computer will not be able to inter- 
pret your keypresses. In fact, you 
can’t even use RUN/STOP-RE- 
STORE if the RUN/STOP key isn’t 
defined; your only recourse will be 
the reset switch. 

The area of memory set aside 
for the new translation tables is 
$1700-$1915 (5888-6421)—534 
bytes total for the six 89-byte tables. 
According to the memory map in 
the System Guide, this is part of the 
area reserved for function key soft- 
ware. Basically, it doesn’t get used 





by BASIC, so it’s a perfect place for 
data like this. (Other machine lan- 
guage routines may use this area, 
however, so you should be on the 
lookout for conflicts. ‘‘TurboDisk 
128” also resides in part of this re- 
served area, but it uses addresses 
lower than KeyDef, so the two pro- 
grams can safely be used together.) 

It should be noted that KeyDef 
changes only the keyboard behav- 
ior; the way the computer runs is 
unaltered. The letters on the screen 
keep their usual shapes; this is not a 
program to create custom charac- 
ters. Also, if you change the letter T 
to be a Z, you've banished T from 
the keyboard but not from the com- 
puter. It can still print a T if you 
type ? CHR$(84)—the ASCII codes 
for the characters remain the same, 


A Few Suggestions 

The first thing you might want to 
do with KeyDef is to correct a minor 
but annoying bug. The CAPS 
LOCK key on the top row works 
like the SHIFT LOCK key for all al- 
phabetic keys except for the letter 
Q, which still prints its unshifted 
form, This is sometimes called the 





caps-lock-q bug, and the reason it 
occurs is very simple—whoever at 
Commodore prepared the CAPS 
LOCK key translation table put the 
wrong character code value in the 
keycode position for Q. KeyDef al- 
lows you to fix this bug. Just replace 
the value for Q in the CAPS LOCK 
table with the proper value (209). 

You may find the ESCape code 
sequences very useful when you're 
programming (see Appendix I in 
the System Guide for a complete 
list). ESC-A turns on automatic in- 
sert mode, ESC-I inserts a blank 
line, ESC-Q erases to the end of a 
line, and so on. But you have to 
reach up to the top left corner to 
reach the ESC key, which is some- 
what awkward. If you defined the 0 
on the numeric keypad as ESC 
(CHRS$(27)) and the other keys on 
the keypad as A, I, Q, and so on, the 
escape sequences would be easier 
to type. 

If you use a modem in telecom- 
munications, you probably know 
that certain control characters are 
common (CTRL-C, CTRL-P, CTRL- 
S, and CTRL-Q are a few of the im- 
portant ones). You need two hands 





to type these keys, which is some- 
what inconvenient. If you prede- 
fined some keys to print the control 
characters, it would simplify things 
a bit. 

Another good use, mentioned 
above, is redefining the period on 
the numeric keypad to be a comma, 
This is helpful when you have to 
type in a lot of DATA statements, 
To make typing in DATA state- 
ments even easier, turn on auto- 
matic line numbering with the 
AUTO command, and use the KEY 
statement to change one of the 
function keys to print DATA. 

One final suggestion: The Ap- 
ple IIc has a small toggle switch 
above the keyboard for changing 
the usual keyboard layout, which is 
most often called the QWERTY key- 
board, to a Dvorak keyboard. The 
woman who holds the title as the 
world’s fastest typist prefers the 
Dvorak keyboard because you can 
type faster. If you'd like to experi- 
ment, you could redefine the CAPS 
LOCK translation table in the Dvo- 
rak layout and press CAPS LOCK 
to switch between the two. 

See program listing on page 101. @ 








WCCA PRESENTS 


SEPTEMBER 20 & 21 1986 
SHOW TIMES 10AM— 6PM 
LOS ANGELES AIRPORT HILTON 

CALL 213-410-4000 for hotel reservations 









English. 












+ EXHIBITS, EVENTS, AND DOOR PRIZES 





$5 TALKING DISK 


OVER 100 WORDS in vocabularies that you can putinto 
your own programs! No extra hardware required. Sam- 
ple programs include: 


¢ Talking four-function calculator — choose English, 
Spanish, or German. 
* Talking keyboard — letters and punctuation in 


« Demonstration of voice editing. 

The $5 Talking Disk is available for Commodore 64, 128, 
Atari 800, 800XL, 130XE, and Apple II+ (64K), Ile, and llc. 
If you want to make your own vocabularies, in any lan- 
guage or accent, then you must have a VOICE MASTER 





+ NATIONAL COMMODORE SPEAKERS 
+ SHOW SPECIALS & DISCOUNTS 

+ SEE THE LATEST INNOVATIONS IN 
HARDWARE/SOFTWARE TECHNOLOGY 
FOR THE COMMODORE MARKET 


The only West Coast exhibition and conference 
focusing exclusively on the AMIGA 
Commodore 128 PC and C-65 marketplace 


REGISTRATION FEES: ONE DAY $10.00 TWO DAYS $15.00 


FOR MORE INFORMATION AND DETAILS CONTACT: | 
WEST COAST COMMODORE ASSOCIATION, INC. 
P.O. BOX 210638 
SAN FRANCISCO, CALIFORNIA 94121 
(415)982-1040 BETWEEN 8AM-5PM PST 
























for processing speech input. VOICE MASTER lets you 
do much more: YOU CAN RECOGNIZE SPOKEN 
COMMANDS and WRITE MUSIC AS YOU HUM! And 
affordable too — under $90 including the headset and 
microphone. 
Send $5 for the talking disk. Prepaid orders only. 
Includes postage. ($7 outside USA, Canada, and Mex- 
ico.) Information on VOICE MASTER will accompany 
your disk, Or you can call or write for VOICE MASTER 
information separately, Please specify computer make 
and model with your order. < 

OOVOX INC. 

675 Conger St. Dept. IN 

Eugene, OR 97402 

Telephone (503) 342-1271 
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128 Sprite Rotator 


are included. 


The Commodore 128 System Guide 
that comes with the computer does 
a pretty good job of describing the 
basics of using sprites. The built-in 
sprite editor is easy to use, and sav- 
ing and loading sprites is a snap. 
Moving sprites and detecting colli- 
sions can be fully automatic for 
realistic animation—without resort- 
ing to machine language, PEEKs, or 
POKEs, About the only thing you 
can’t do is rotate a sprite. But why 
would you want to any way? 

Let's say’you’d like to write a 
program that displays a race car, 
viewed from above. The race car 
will be a sprite that you can easily 
create with the built-in sprite edi- 
tor, It will be driven around the 
screen by a joystick, using the JOY 
function to read the joystick and the 
MOVSPR command to move the 
sprite—a simple program that does 
a lot in just a few lines, But what 
happens when you change direc- 
tion? The race car just slides around 
the screen, always pointing in the 
same direction. Not very realistic. 
The SPRSAV command is the an- 
swer: It can instantly change the 
sprite to a different shape, The 
sprite shape can come from another 
sprite, a string variable or a string 
array. Thus, you can predefine a 
virtually unlimited number of 
sprite shapes for lightning quick re- 
call and display. 


A Demonstration 

For an example of this, type in Pro- 
grams 1 and 2. Program 1 is a sim- 
ple BASIC program that chooses 
one of eight different sprite shapes 
depending on which of the eight 
possible joystick directions is se- 
lected, Each of the eight sprite 
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Mike Tranchemontagne 


Here’s a clever technique for rotating sprites as 
they are moved on screen. Demonstration programs 


shapes represents a dragster facing 
in one of the joystick directions. 
Program 2 isn’t really a program— 
it’s the shape definition data for the 
eight dragster sprites, The data 
must be entered with the 128 
““MLX’’ machine language entry 
program found elsewhere in this is- 
sue. Be sure you read and under- 
stand the MLX article before you 
begin entering the sprite data, 
When you run MLX, you'll be 
asked for a starting address and an 
ending address. The values for the 
sprite data are as follows: 

Starting address: 0E00 

Ending addi OFFF 

After you've entered all of the 
sprite data, be sure to use the MLX 
Save option to save the data to disk 
with the filename DRAGSTER.SPR, 
You must use this name so that Pro- 
gram 1 can find the file (see line 50 
of Program 1). Now load and run 
Program 1 and see what how much 
more realism you can achieve with 
sprite rotation. 

Lines 10-40 of Program 1 ini- 
tialize the graphics display. Line 50 
loads the file created by Program 1. 
The BLOAD command, as used for 
sprite shape disk files, loads data 
into the 128 memory area reserved 
for the eight sprites. In BASIC 7.0, 
the sprites always get their shape 
data from this memory—one shape 
per sprite. If BLOAD were the only 
way to change a sprite’s shape, 
changing sprite shapes would be a 
slow process. Instead, line 90 
DiMensions a string array to hold 
eight sprite shapes, and line 100 
uses the SPRSAV command (a truly 
versatile command) to define the 
string array contents—the eight dif- 
ferent views of our race car. (The 











commands in line 50, 90, and 100 
could be repeated with other sprite 
shape data files and other string ar- 
rays to define as many sprite shapes 
as needed—limited only by the 
amount of memory in bank 1 avail- 
able for strings.) Line 110 and 120 
turn on and position the car to 
about center screen. Lines 130 thru 
140 form a loop which repeats until 
the fire button is pressed. The inner 
loop (lines 140 to 180) executes 
only when the joystick is moved off 
center. The joystick direction (JS$) 
is used to select the sprite shape 
(line 160) and one of the eight 
movement subroutines (line 170), 
Program 3, “Sprite Rotator,” 
rotates any sprite shape for you, All 
you have to do is define the first 
sprite shape and Sprite Rotator 
does the rest. Although you don’t 
need to know how Sprite Rotator 
works to use it, you may find some 
of the following techniques useful. 
The 90-degree and 45-degree rotate 
subroutines (lines 410 and 500) are 
greatly simplified by the use of the 
graphics screen as a scratch pad 
memory. In line 580, GSHAPE 
stamps the image of the sprite 
shape to be rotated. Thus the 
RDOT(2) function (line 450 or 540) 
can address the sprite shape data in 
simple x,y coordinates. (These two 
lines were much more complicated 
when the rotation computations 
were performed on direct memory 
addresses.) The DRAW commands 
create the rotated shape below the 
original and the SSHAPE com- 
mand at line 620 saves it to S$. 
After all eight shapes are ready, the 
subroutine at line 680 will display 
the BSAVE command for you—edit 
the filename and press RETURN to 
save your work. You can also use 
SPRDEF (the built-in sprite editor) 
to touch up any of the sprites before 
saving. 
See program listings on page 102. @ 











Kaleidoscope Revisited 


W. M. Shockley 


Here’s an updated version of a popular 1985 
Gazette program that turns your computer into an 
ever-changing kaleidoscope of shape and color— 
all under your control. This newer version adds 
sound, several more controls, and an option to get 
a printout on any Commodore or Commodore- 
compatible printer. For the 64, Plus/4, 16, and 


vic. 


The October 1985 issue of COM- 
PUTE’s GAZETTE included an inter- 
esting graphics program titled 
“Kaleidoscope.” It turned the 64, 
Plus/4, 16, and VIC into a highly 
entertaining and colorful kaleido- 
scope with various speed and com- 
plexity controls. ‘‘Kaleidoscope 
Revisited” adds sound, a few more 
controls, and a printer option, but 
you don’t need the original “Kalei- 
doscope” to use it. The original pro- 
gram has been incorporated into 
this updated version. 


Getting Started 

After typing in the version for your 
computer, save a copy. To use it, 
load it and type RUN. You're pre- 
sented with a self-explanatory in- 
struction screen which lists all the 
available functions and the corre- 
sponding keys. At this point, press 
any key to get started. The H (for 
Help) key can be pressed at any 
time during the program to get back 
to the help screen. 

Kaleidoscope makes ideal pat- 
terns for quilt squares, paper snow- 
flakes, or artistic designs. The new 
printer option allows you to save 
them, Also added to the original 
program is an option to select the 
character you want to comprise the 
pattern. Press P and you'll be 
prompted for an input. Type the 
screen code (1-255) of the character 
you want. (These codes are listed in 
the 64, Plus/4, and VIC user man- 
uals.) A random character is chosen 





if you press R. Repeated R’s make 
fascinating patterns. 


Printing Options 

The printout option is selected by 
pressing SHIFT-P for a small copy, 
or SHIFT-D for a copy double width 
and double length, making it four 
times as large. A printout can be 
made only of a black-and-white 
pattern (selected by pressing B). As 
written, the program works with 
the Commodore 1525, MPS-801, 
and MPS-803 printers. If you own a 
Commodore 1526 or MPS-802 print- 
er, a few line changes are necessary. 
If you have a 64, delete lines 1090- 
1150, Plus/4 and 16 users should 
delete lines 1050-1110, and VIC 
users should delete lines 950-1010. 
Then—regardless of which of the 
above computers you’re using— 
add these lines to the program to 
adjust it for the 1526 or MPS-802: 
DK 1200 OPENG,4,6:PRINT#6,CHRS 
(22) :CLOSE6 :OPEN4 ,4:FO 
RG=OTORR 

IF FGTHENFORF=1T02 :PRIN 
T#4 ,CHRS$(14); 
FORN=SS+G*CCTOSS+G*CC+ 
WW:Q=PEEK(N) 

TE (OANDIS )=17HENPRINTE 
IF (QAND15) <> 1 THENPRINT 
Ey OR 


HK 1218 
FM 1226 
xQ 1230 
AH 1240 


NEXTN: PRINT#4 : 1 FFGTHEN 
NEXTF 

NEXTG : FORN=1T04 : PRINTS 
4:NEXT:CLOSE4 :OPEN10,4 
,18:PRINT#14 :CLOSE16 
FG=6 :RETURN 


The S key toggles on and off 
the sound option. The remainder of 


1256 
PB 1268 


BJ 1270 








This pattern was created simply by run- 
ning the program. None of the extra fea- 
tures are in effect. 





The “H” and spade graphics character 
were selected with a new program 
option—choosing the characters you 
want to make the pattern. 





A more complex pattern is selected with 
the function keys. 


the options are those found in the 
original ‘‘Kaleidoscope’’—and are 
obvious from the help screen. The 
additions make an already interest- 
ing program even more flexible and 
entertaining. 

See program listings on page 103. @ 
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POWEr BASIC 


Jay A. Reeve 


This short but powerful utility grace- 
fully removes Commodore's ‘two 
screen lines only” programming re- 
striction. Included are versions for the 
Commodore 64, Plus/4, and 16. 


How often have you hit the two- 
line squeeze while programming? 
Your BASIC statement won't quite 
fit into what's left of the two lines 
allowed by the Commodore screen 
editor. You go back and change full 
keywords to abbreviations—it still 
doesn’t fit. You could simply move 
the last statement to the next line, 
except that it follows an IF-THEN 
statement. 

Next, you replace the state- 
ment with GOTO and guess at a 
line number that you hope won’t be 
in the way later on. Then you re- 
type the statement on the new line 
(how did that go again?) and try to 
recall the logic you were using for 
the program. You're left with a feel- 
ing that your program has just lost a 
little of its elegance. 


Ending The Squeeze 

“BASIC Line Extender” is a utility 
for BASIC programmers that allows 
you to add to the end of any line in 
your program, You're still limited to 
entering two screen lines at a time, 
but you can build up program lines 
which take six or more screen lines 
to list. Once entered, these extend- 
ed lines will save, load, list, and run 
properly whether or not BASIC Line 
Extender is active. 

Although BASIC Line Extend- 
er can be used to extend any pro- 
gram line, it’s most valuable for 
continuing IF-THEN statements, 
allowing you to handle an error, for 
instance, on the same line in which 
it is detected. It’s also good for add- 
ing descriptive REM statements to 
program lines, and for creating ex- 
tra-long DATA lines or ON-GOTO 
statements. When memory is at a 
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premium, an extension saves at least 
four bytes over starting a new line. 


Preparing BASIC 

Line Extender 

The program itself is short and con- 
tains some machine language in the 
form of DATA statements. Type it 
in and be sure to save a copy before 
running it—the program will erase 
itself after creating and activating 
the machine language routine. 

In the Commodore 64 version, 
line 10 protects a space for the ma- 
chine language program by lower- 
ing the pointer to the top of BASIC 
by 256 bytes. If you'd like to locate 
BASIC Line Extender elsewhere in 
memory, replace the value for the 
variable AD in line 10 with the 
starting address you want. 

To disable BASIC Line Extend- 
er: POKE772,124:POKE773,165. 


Creating Extensions 

An extension is a line to be added to 
the end of a program line already in 
memory. Enter the extension with 
the same line number as the line to 
which it will be added. The first 
character after the line number will 
be one of three signal characters 
which never begin a normal BASIC 
line: a colon (:), a quote mark (’’), or 
a British pound sign (£). 

1, When the extension begins 
with a new statement, follow the 
line number with a colon, The co- 
lon will be included in the extended 
line as a statement divider. If you 
enter the line, 10 PRINT’ THIS IS A 
LINE”, it will list normally. Next 
enter the line, 10 :PRINT“AND ITS 
EXTENSION” and the listing will 
read, 10 PRINT’ THIS IS A LINE- 
‘“PRINT“AND ITS EXTENSION”. 

2. When the separation falls 
between quotes (in a PRINT state- 
ment or string definition), the origi- 
nal line must not have a closing 
quote mark. (BASIC does not re- 
quire close-quotes at the end of a 








BASIC Line Extender 


line anyway.) The extension line, 
however, must begin with a quote 
("), which will be omitted from the 
extended line. Enter 20 PRINT 
“THIS IS A LINE followed by 20 “ 
AND ITS EXTENSION” and the 
listing will show 20 PRINT’ THIS 
IS ALINE AND ITS EXTENSION”. 

3. To continue in mid-state- 
ment, begin the extension line with 
the British pound character, This 
signal character, of course, will not 
be included in the program, Enter 
15 A=A+B then 15 £*256 to get 15 
A=A+B*256. A statement may be 
broken and continued at any point 
except within a BASIC keyword. 
(BASIC stores and uses keywords 
as single-byte tokens. Extensions 
are tokenized separately, so the to- 
kenizing routine would have no op- 
portunity to recognize a keyword 
that was partly in the original line 
and partly in the extension.) Watch 
carefully for split keywords, as they 
will appear correct in listings but 
will cause syntax errors or, worse, 
erroneous results when the pro- 
gram is run. Numbers and variable 
names may be broken: 25 SYS49 and 
25 £152 will result in 25 SYS49152. 


If you prefer to use a different 
signal character (other than £), try 
replacing the number 92—at the end 
of line 60 in the 64 version or near 
the beginning of line 220 in the 
Plus/4 and 16 version—with 170 
(for +), 95 for (+), or 173 for (/). 

You can, if you like, add exten- 
sion after extension—the tokenized 
line may be up to 244 bytes long, If 
an extension would cause this limit 
to be exceeded, a STRING TOO 
LONG ERROR will be returned, 
leaving the line unchanged. The 
trade-off for this dramatic increase 
in flexibility is some difficulty in 
editing. 


Editing Extended Lines 
If you ever use abbreviations for 
BASIC keywords, you know that 








line listings sometimes run over 
onto a third line, and that run-over 
lines can be difficult to edit. The 
extra-long lines generated with 
BASIC Line Extender may be no 
easier to edit, but in most cases 
they'll be no more difficult either. 
List the extended line and re-enter 
it, two screen lines at a time, by 
using abbreviations to shrink the 
lines enough to insert the line num- 
ber and the appropriate signal char- 
acter, being careful to reassemble 
any split keywords before entering 
and making necessary changes as 
you go. 

If you anticipate needing to 
edit extended lines, you may wish 
to enter them first as partial lines 
with different, very high line num- 
bers (you can even include the sig- 
nal characters, so long as a line of 
that number does not already exist), 
then combine them by changing 
the line numbers. To edit, you can 
list the partial lines, make any 
changes, and recombine them by 
again replacing the line numbers. 
When the program is completed, 
the partial lines can easily be de- 
leted from the end. 

You no longer need to count 
spaces, refer to lists of abbrevia- 
tions, and retype statements that 
won't fit. Activate BASIC Line Ex- 
tender at the start of each program- 
ming session and let your creative 
logic flow—and forget about the 
two-line squeeze. 

See program listings on page 102. @ 


Copy. 


SUPER FAST DISK COPY PROGRAM 
+ USE 1 OR 2 DRIVES (1541's or 1570/1571's) 
# COPY TIME: FULL=2 Min,, BAM=23 Secs-2 Min 
* WILL ALSO RUN IN 1570/1571 DRIVES! 
* AUTOMATIC FORMATTING OURING COPY 


* GREAT FOR MAKING FAST MULTIPLE COPIES: 
* PACKED WITH GREAT FEATURES 


* ABSOLUTELY NO HARDWARE TO INSTALL 


* THE MOST RELIABLE FAST COPIER ON THE MARKET 


* DON'T BE FOOLED BY THE LOW PRICE 
THIS ONE IS VASTLY SUPERIOR! 


COPIES AS 
FAST AS 


$4995 


G€opy-157 


‘SUPER FAST DISK COPY PROGRAM 
* USE 1 OR 2 DRIVES (15701571) 
* COPY TIME: FULL = 2 Min,, BAM=29 Secs-2 Min, 
* MAKES 1 AND 2 SIDEO COPIES, 
# AUTOMATIC FORMATTING DURING COPY 
* GREAT FOR MAKING FAST MULTIPLE COPIES. 
* PACKED WITH GREAT FEATURES 
* ABSOLUTELY NO HAROWARE TO INSTALL 
* THE MOST RELIABLE FAST COPIER ON THE MARKET 
* ANECESSITY FOR ALL SERIOUS 1571 OWNERS: 
NEW & HOT! ORDER YOURS TODAY! 


COPIES AS $2995 





Fast-Loap/Save 


* LOADS/SAVES PROGRAMS LIGHTNING FAST 

# NO MORE LONG DELAYS WAITING FOR 
YOUR PROGRAMS TO BE LOADED OR SAVED 

# LOADSISAVES UP TO 
5:10 TIMES FASTER, 








$1995 


FAST AS 
POWERHOUSE 


* SPEEDFORMAT (TAKS 1-40) 
FORMAT FULUMALF TAK, PARTIAUFULL DISK 





WRITES PROPER BLOCKS W/BAM & DIRECTORY 
9 Secs.18 Secs. WVERIFY 
FORMAT MULTIPLE DISKS 





ESSENTIALS 


* RENUMBER # AUTOBOOT + DE-NEW 
*# DATAMAKER # UNSCRATCH 
* FILE LOCK # APPENDER, 

# FILE COPY (incl ol) 

# SCREEN DUMP 


TO ORDER 
Ai Sp 
1-813-792-5300 wa2= 
+ FAST 
SHIPMENT 
* FAST UPS 
DELIVERY 








All programs 
listed in this 
magazine are 
available on the 
GAZETTE Disk. 
See details 
elsewhere in 
this issue. 











* DISKMON 

RUW TRACK, SECTORS, HEADERS 

CREATE YOUR OWN HEADERS & HIDDEN 10'S. 
EDIT ML PROGRAMS RIGHT ON DISK 

+ DRIVEMON 

UW DRIVE MEMORY IN HEX OR 


DeGMaL sonecuPnntER oUTPUT SO QOS 












Paracnisipra: 


reo caro 
NOT CHARG 








QWERSLST 


INCORPORATED * P.O, BOX 7333 + BRADENTON, FL 33507 








Save Your Copies of COMPUTE! 


Cases: 


$6.95 each; 
3 for $20.00; 
6 for $36,00 


$8.50 


Binders 


Protect your back issues of COMPUTE! 
in durable binders or library cases, 
Each binder or case is custom-made 
in flag-blue binding with embossed 
white lettering. Each holds a year of 
COMPUTEI. Order several and keep 
your issues of COMPUTE! neatly or- 
ganized for quick reference. 
(These binders make great 
gifts, tool) 


(Please add $2.50 per unit for orders 


ach; outside the U.S.) 


3 for $24,75; 
6 for $48.00 


Send in your prepaid order with the 
attached coupon 


Mail to: Jesse Jones Industries, P.O. Box 5120, 
Dept. Code COTE, Philadelphia, PA 19141 


Please send me 


Enclosed is my check or money order for $ 


only.) 
Name 


COMPUTE! O binders. 


. (U.S, funds 


O cases 





Address 





City 





State 





Satistaction guaranteed or money refunded. 


Proase allow 4-6 wooks for delivery, 
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simple answers 
t© COMMON GueEestions 


Each month, COMPUTE!’s GAZETTE 
tackles some questions commonly 
asked by Commodore users. If you 
have a question you'd like to see an- 
swered here, send it to this column, 
c/o COMPUTE!'s GAZETTE, P.O. Box 
5406, Greensboro, NC 27403. 


e Phones have it, clocks have 
it, radios have it, auto-dialers have 
it, and newer cars have it. But per- 
sonal computers don’t have it— 
and they need it more than the 
rest. Why haven’t manufacturers 
incorporated or made available 
backup power supplies to safe- 
guard against memory loss? 


A. There are battery-backup 
power packs available for some 
computers, mainly the IBM PC. But 
they tend to be expensive and are 
designed to work only for short peri- 
ods. The idea is to give you enough 
time to save your program before 
powering down, not to continue op- 
erating on batteries indefinitely. 

The problem is that regular 
memory chips consume much more 
power than most batteries can de- 
liver for an extended period of time. 
All of the other battery-backup de- 
vices you mention consume very 
little power. There’s no way you 
could power a typical personal 
computer on a handful of penlight 
or flashlight batteries. 

Portable laptop computers, 
such as the TRS-80 Model 100, get 
around this problem by using spe- 
cial memory chips called CMOS 
(Complementary Metal Oxide 
Semiconductor) chips. CMOS chips 
consume much less power than 
regular chips, but also cost a lot 
more. Your Commodore 64 or 128 
might be two or three times more 
expensive if it were built with 
CMOS technology. And even with 
CMOS memory, a laptop such as 
the Model 100 cannot run for more 
than a day or so ona set of batteries. 
This makes it considerably more ex- 
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pensive to operate than a conven- 
tionally powered computer. 

If CMOS chips become cheap- 
er, they may find their way into 
more desktop computers. Until 
then, the best way to avoid power- 
outage anxiety is to save your data 
often and keep plenty of backups. 


e In the March 1986 “Simple 
Answers To Common Questions” 
a reader asked why a piece of 
disk-based commercial software 
would load on a Commodore 64 
system at the store but not at 
home on his own system. You 
suggested that perhaps his disk 
drive was misaligned. I have en- 
countered this frustrating prob- 
lem more than once, and it was 
caused by having a printer 
plugged into the disk drive and 
left turned off. Either turning the 
printer on or unplugging it solved 
the problem. I’ve found that Mov- 
ie Maker, Cell Defense, and some 
older versions of SpeedScript 
won't load properly if the printer 
is plugged in and turned off. 


A. We still suspect that drive 
misalignment is the most likely 
source of the reader's difficulties 
with commercial software, but a 
few other users may encounter the 
situation you suggest. The printer 
interfaces used to connect most 
third-party printers draw power 
from either the cassette port or a 
joystick port. Such interfaces re- 
main on and may cause problems 
by attempting to respond to com- 
mands on the serial bus when the 
printer is off (even if the command 
is intended for the disk drive). This 
is more likely with commercial 
products which reprogram the disk 
drive for faster loading and/or for 
copy-protection purposes; Speed- 
Script does not reprogram the disk 
drive and is not copy-protected, so 
we don’t know why it should cause 
problems. Still, if this simple solu- 








Tom R. Halfhill, Staff Editor 


tion works, it is worth the try. 


Q. Thave often seen programs 
with DATA statements strung to- 
gether, and would like to know 
how the computer knows which 
DATA statements go with which 
READ statements. 


A. Very simple. The first READ 
statement in a program begins 
fetching data from the first DATA 
statement in the program. It contin- 
ues reading from the DATA state- 
ments in sequence until it has 
fetched all the data it needs, or until 
there are no more DATA state- 
ments. (In the latter case, the pro- 
gram stops with an OUT OF DATA 
error.) Here’s an example: 

10 FOR N=1 TO 5:READ A:NEXT 

20 FOR N=1 TO 4:READ A:NEXT 

30 DATA 1,2,3,4 

40 DATA 5,6,7,8,9 

Line 10 contains the program's 
first READ statement, so it begins 
reading from the program’s first 
DATA statement at line 30. Line 10 
loops five times, reading all four 
items of DATA in line 30, then con- 
tinues to line 40 and reads the first 
data item there. Line 20 contains 
another READ statement, and it 
starts reading where the previous 
READ left off. In this case, it begins 
with the second item in the DATA 
statement at line 40. It loops four 
times, reading the rest of the data in 
line 40. Just remember that a pro- 
gram can safely read fewer data 
items than are contained in DATA 
statements, but cannot try to read 
more data items without causing an 
OUT OF DATA error. 

If you want your program to 
start reading from the first DATA 
statement again, use a RESTORE 
statement. The next READ after a 
RESTORE acts just like the first 
READ in the program: It starts at 
the first item in the first DATA 
statement. This lets a program use 
the same data more than once. @ 
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Fred D’Ignazio 
Associate Editor 


We've all heard how it’s good to 
write using words that evoke vivid 
images—ripening pumpkins, boom- 
ing thunderstorms, hot freshly 
baked bread, creaking doors, and 
spinning carousels. It’s because 
these words trigger our readers’ 
sense of smell, sight, hearing, 
touching, etc. The words recall ex- 
periences from the readers’ memo- 
ries and allow them to vicariously 
experience a new event through 
their own imagination. 

But which comes first—imagi- 
nation or words? Do we imagine 
something first, and then tell others 
what we have imagined? Or, as my 
mother used to say, do we set our 
mouth in motion before we put our 
mind in gear? 

Flannery O'Connor once wrote, 
“I write because I don’t know what 
I think until I read what I say.” 

In my career as a writer I’ve 
discovered the same thing. 
Thoughts pop into my head all the 
time, but the thoughts are little 
more than fireflies flitting about ina 
darkened sky. It’s only when I write 
my thoughts down that I clearly 
perceive what they are and why 
they are meaningful. 

I've learned that in trying to 
communicate my thoughts to other 
people I am also learning to imag- 
ine things more vividly myself. If I 
can’t state something briefly and 
clearly, the chances are it’s because 
my image of it is incomplete, fuzzy, 
or muddy. The writing—rewriting, 
editing, and revising—process is a 
way for me to learn a subject well 
enough to communicate its essence 
to someone else—and to myself. 

So writing—or communicat- 
ing—is also imagining; they go 
hand in hand. But what kind of 
imagining am I actually doing? 

How does your imagination 
work? Do you imagine in words? 


Lists? Do your thoughts take the 
form of old black-and-white mov- 
ies? Are they Technicolor extrava- 
ganzas, complete with Dolby 
sound? Or perhaps they are more 
like my little fireflies. 

I know how I imagine, and it’s 
not in words. It’s in images, emo- 
tions, and sensual feelings—smells, 
sounds, muscular contractions, sen- 
sations of being hot, cold, hungry, 
or excited—a whole symphony of 
little feelings and impressions that 
combine to form a single thought. 
Even a simple thought. 

But I can’t express the thought 
in this raw form; I have to translate 
the thought into words. This is a la- 
borious and time-consuming pro- 
cess. The computer can help us 
translate our thoughts into words. 
But, up until now, that’s all it has 
been—a thought-to-word transla- 
tor. Think of how much more valu- 
able it would be if we could use it as 
a medium for expressing our 
thoughts directly—as images, 
sounds, voices, scenes, events—as 
well as in words. If we could do 
this, we would be using the com- 
puter as a hotline to our imagination. 
And by encouraging us to commu- 
nicate audiovisually, it could en- 
rich, strengthen, and develop our 
imagination. 

Up until now, computers have 
communicated other people's 
imaginations to us audiovisually, 
but, with rare exceptions, they have 
not given us the ability to commu- 
nicate at this level ourselves. Or 
even to imagine at this level. But in 
another year or two, multimedia 
computing will be here. We will 
have optical read-write discs that 
will let us cut and paste images, 
sounds, music, voices, words, fig- 
ures—you name it. We will all have 
the chance to become multimedia 
thinkers and communicators using 
our imagination processors. 

That technology has not yet ar- 
rived. But we don’t have to wait. 














Computers And The 
Audiovisual Imagination 


We can use computers along with 
other devices—cassette recorders, 
VCRs, and video cameras. We can 
create pictures and words on the 
computer, music and voices on the 
cassette recorder, and combine 
them all on a videotape and play 
them back on a VCR. We can sup- 
plement the computer's images with 
images shot with a video camera. 

My children (Catie, 10, and 
Eric, 7) and I are doing this now. 
We recently created a computer 
animation of a black hole, then 
added music from the soundtrack 
of the movie Jaws and Catie’s narra- 
tion of the life cycle of black holes. 
Now we are working on a movie 
about a creek we discovered behind 
our house that we call “Big Creek.” 
We're using computer paint and 
animation programs to produce a 
map of Big Creek and the titles, 
credits, and graphics for our movie. 
We have combined these with nar- 
rations and lots of video shots of us 
actually exploring Big Creek. And 
there’s a story line, too: how Big 
Creek is being affected by a hous- 
ing development going up along- 
side it. 

How would you use a com- 
puter as an imagination processor? 
Please write me, care of COMPUTE!’S 
GAZETTE. You can communicate 
your ideas in words. But I'd also 
love to see some videos, audio 
tapes, cartoons, and drawings. You 
can use your computer as a multi- 
media tool to express your imagina- 
tive ideas. In the next century, 
multimedia communicators and 
multimedia thinkers will be in great 
demand. We can all get started 
learning how to think, communi- 
cate, and imagine at this level now. 

@ 
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If you've discovered a clever time- 
saving technique or a brief but 
effective programming shortcut, 
send it to “Hints & Tips,” c/o 
COMPUTE!’s GAZETTE. If we use 
it, we'll pay you $35. Due to the 
volume of items submitted, we re- 
gret that we cannot reply individ- 
ually to submissions. 


Simulating PRINT-AT 
Hue Thao 


Some BASICs have a PRINT-AT or 
PRINT@ command which allows 
you to position a message any- 
where on the screen simply by 
specifying the row and column 
where you want it printed. The 128, 
Plus/4, and 16 have CHAR, which 
works like a PRINT-AT. The CHAR 
command can be used on the nor- 
mal text screen (40 or 80 columns) 
or on a hi-res screen. 
Unfortunately, the 64 and VIC 
don’t have a BASIC keyword for 
positioning the cursor. There is, 
however, a machine language Kernal 
routine to move to a given location, 
and it’s easy to call from BASIC. 
You don’t need to know any ma- 
chine language to use the PLOT 
routine, you just use a few POKEs 
and a SYS. Try typing the following 
program (for 64 and VIC only): 


10 PRINT CHR$(147): REM CLEAR 
(SPACE ] SCREEN 
20 POKE781,15: REM ROW 


30 POKE782,4: REM COLUMN 
4® POKE783,48: REM CLEAR CARRY 
5@ SYS65520: REM PLOT ROUTINE 
68 PRINT"ROW 15 COLUMN 4" 


The first column on the screen 
is numbered 0 (not 1, as you might 
expect), so you're allowed to use 
column numbers from 0-39 on the 
64 or 0-21 on the VIC. Likewise, 
the rows can be in the range 0-24 
(64) or 0-22 (VIC). 

The next time you're thinking 
about printing 19 cursor down 
characters and 15 cursor rights to 
print something in the right place 
on the screen, remember the Kernal 
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PLOT routine. It might save you 
some time. 


Combining Two Programs 
Donald E. Fulton 


The March “Hints & Tips” con- 
tained a useful technique for merg- 
ing two programs on the 128. 
Here’s a way to append two pro- 
grams on other Commodore ma- 
chines, including the 64, Plus/4, 
16, and VIC. It works with disk 
drives and tape drives. 

Load the first program into 
memory. Find out where the BASIC 
program area begins by entering 
the following line which prints the 
contents of the start-of-BASIC 
pointer: 

PRINT PEEK(43), PEEK(44) 

Write down the two numbers. 
On the 64, they should be 1 and 8. 
VIC values will vary, depending on 
how much memory expansion is 
present. The Plus/4 and 16 may 
have one of two values, depending 
on whether you've used the graph- 
ics area. Owners of the Plus/4 and 
16 should type GRAPHIC CLR 
before using the PEEKs above to 
make sure there’s no memory set 
aside for a hi-res screen. 

Next, type the following line, 
which calculates the ending ad- 
dress for the BASIC program: 

X = PEEK(45) + 256*PEEK(46): PRINT X 

If the start of BASIC is moved 
up to this location—the end of the 
first program—you can load a sec- 
ond program to the new (higher up) 
memory address and then move the 
start of BASIC back to where it was 
originally. The second program will 
be added to the end of the first. But 
there’s a catch: The start of BASIC 
should be moved to two locations 
below the current end-of-BASIC. 
Otherwise, the two zeros that mark 
the end of a program will get in the 
way. Enter this line next: 


POKE 44, INT((X—2)/256): POKE 43, 
(X—2) AND 255: NEW 











Simulating PRINT-AT and APPEND 


Load the second program from 
tape or disk. This program must 
have higher line numbers than the 
first program, so you may have to 
use a renumbering utility (or re- 
number it by hand). Finally, restore 
the original start-of-BASIC pointer: 
POKE 43,1: POKE 44,8 


If you have a Plus/4, 16, or 
VIC, substitute the values PEEKed 
from 43-44 when you first started, 
The new program can now be saved. 

The same technique will work 
on the 128 if you use 45-46 instead 
of 43-44 for the start-of-BASIC 
pointer and 4624-4625 (in place of 
45-46) for the end-of-BASIC pointer. 
The method described in the March 
issue is preferable, though, because 
it does a true merge of two pro- 
grams, rather than a simple append. 

There’s an easier way to ap- 
pend two programs if you have ac- 
cess to the SpeedScript word 
processor. It’s based on the same 
principle as the PEEKs and POKEs 
above. 

Load and run SpeedScript and 
use it to load the first program as if 
it were a text file. It's a program, not 
a SpeedScript file, so it will look very 
strange. Pay no attention to its ap- 
pearance. Without changing any- 
thing, go to the end of the file. 
There you'll see three commercial- 
at signs (@@@). These are the 
three zeros at the end of the pro- 
gram. Delete the last two (at the 
very end of the file), so only one re- 
mains. Now, without moving the 
cursor, load the second program 
into SpeedScript. If you want to ap- 
pend a third program, this process 
can be repeated. 

Save the resulting file and exit 
SpeedScript. Since the combined 
program has been saved from high 
in memory, you'll have to load it 
with a ,8 instead of ,8,1. If you LIST 
it, you should see that the second 
program has been appended to the 
first. @ 








Todd Heimarck 
Assistant Editor 


Two decades ago, words like sub- 
routine and debug were jargon, part 
of a secret language spoken only by 
a tiny cabal of programmers. As 
more and more people have bought 
home computers, these words and 
others have become fairly com- 
monplace. There’s still a sort of se- 
cret knowledge, though: machine 
language (ML). To BASIC program- 
mers, terms like raster interrupt 
may not make a lot of sense. Let's 
take a look at what an interrupt is 
and see one in action, 

Machine language isn’t espe- 
cially complex. In fact, you're very 
limited in what you can do, Imag- 
ine writing a program with only 
PEEK, POKE, AND, OR, IF-THEN, 
GOSUB, and GOTO, You're also 
able to add, subtract, multiply by 
two, and divide by two, The proper 
combination of small ML com- 
mands can accomplish amazing 
things, however, just as thousands 
of small bricks can be made into a 
mansion, 

As one illustration of BASIC’s 
speed, type in and run the follow- 
ing one-line program for the 64. It 
switches the border color between 
white and red as fast as possible: 


10 POKES3286,1:POKE5S3280,2:GOT 
019 


Press STOP to stop the pro- 
gram. Now try this ML program 
(also for the 64): 


16 FORJ=49152T049164:READA:CK= 
CK+A: POKEJ, A:NEXT 

2@ IFCK<>1788THENPRINT "PLEASE 
{SPACE}CHECKING YOUR TYPI 
NG." 

30 SYS49152 

108 DATA169,1,141,32, 208, 234,1 
69 

118 DATA2,141,32,208, 208,243 


The machine language, slight- 
ly more than a dozen bytes long, is 
encoded in DATA statements. Press 





horizons 





RUN/STOP-RESTORE to turn it off. 

A TV screen is redrawn 60 
times a second, 262 screen lines 
(also called raster lines) at a time. 
Characters are eight lines tall, so 
the 25 rows need 200 lines, with 62 
left over for the top and bottom 
screen borders, Multiplying 60 
screens by 262 lines tells you that 
roughly 15,000 raster lines are 
drawn every second. If you look 
closely at the top or bottom border 
while the ML program is running, 
you'll see that the border color is 
changing approximately eight 
times per line, which means the 
machine language instructions to 
switch color are taking only about 
1/120,000 of a second, That's fast. 

Both the BASIC and ML pro- 
grams take over the 64 while 
they're running. You can’t list a 
program or perform a calculation 
while either one is busy changing 
screen colors, Here’s where we call 
on a raster interrupt, which gives 
control of the computer back to us. 


Waiting For A Chance 

To Interrupt 

The 6510 chip, the brains of the 
Commodore 64, is built to run pro- 
grams. Once in a while, however, it 
must stop what it’s doing to interact 
with the outside world. Every sixti- 
eth of a second, the processor in the 
64, the 6510 chip, puts aside what 
it’s doing to read the keyboard and 
click the jiffy clock. 

But the 6510 can’t be trusted to 
automatically perform this task; left 
to itself it would continue running 
whatever program was in memory, 
ignoring the keys you might be 
pressing. So one of the CIA chips is 
entrusted with an alarm clock; 60 
times a second it has to remind the 
6510 that it’s time to do some 
things like checking the keyboard. 

This reminder is an interrupt 
request (IRQ) which diverts the pro- 
cessor from the main job of running 
a program for a short while. The 








What Is A Raster Interrupt? 


normal IRQ that checks for key- 
presses is invisible to BASIC and 
ML programmers, It’s automatic. 

There’s another sort of IRQ, 
one that’s programmable. The VIC 
chip, which handles everything 
that’s printed to the screen, can trig- 
ger an interrupt based on sprite col- 
lisions, light pen input, or the raster 
line currently being drawn. 

The raster interrupt program 
(in the Program Listings section) 
tells the VIC chip to wait for some- 
thing to happen on the screen 
before it asks the CIA chip to gener- 
ate an interrupt. Unlike the normal 
interrupt, which is based ona clock, 
a raster interrupt sets an alarm to go 
off when a certain line of the screen 
is being drawn. At that point, the 
processor is told to go to a short ML 
program that changes the border 
and background colors, after which 
it returns to what it was doing. If we 
set the alarm to go off at several 
places on the screen, we can create 
zones of color, each with its own 
border and background color. In 
between interrupts, the processor 
can run regular BASIC programs, 

Being able to change the screen 
color might not seem like much, but 
there are several good uses for the 
raster interrupt technique. If you've 
ever seen a game that uses more 
than eight sprites, you've seen a 
raster interrupt in action. The idea 
is the same as the color bar pro- 
gram: You set the interrupt to hap- 
pen at a certain line on the screen. 
Then the sprite pointers are 
changed, so the video chip thinks 
the sprites are at a new location. 
The split screen graphics modes on 
the 128 (GRAPHIC 2 and GRAPH- 
IC 4) also rely on a raster interrupt. 
These two commands allow you to 
create a hi-res screen on the top 
portion of the screen, with a text 
area down below. 
See program listing on page 108. @ 
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Daisy Wheel Printer 
Silver Reed America has introduced the 
EXP420, a letter-quality daisy wheel 
printer that prints 12 characters per sec- 
ond. The EXP420 works with almost 
any computer, including the Commo- 
dore 64 and 128, and offers super and 
subscripts, bold and shadow print, 
auto-underline, 10 and 12 pitch selec- 
tion, bidirectional printing, and a built- 
in Commodore and parallel interface. 
The printer also comes in a serial 
model. 

The EXP420 printer has a suggested 
retail price of $299.95. 

Silver-Reed America, Inc., 19600 S. 
Vermont Ave., Torrance, CA 90502. 
Circle Reader Service Number 219. 





Spelling Aid 

Whole Brain Spelling from SubLOGIC 
teaches you a method for learning how 
to spell. It includes 200 ten-word lists in 
six different categories—general, a 
child’s garden of words, fairy tale, sci- 
entific, medical, and business. Color 
graphics provide positive feedback. For 
the Commodore 64/128 with one disk 
drive and color monitor. 

Whole Brain Spelling is available for 
$29.95 plus $2.00 shipping and 
handling. 

SubLOGIC Corporation, 713 Edge- 
brook Dr., Champaign, IL 61820. 

Circle Reader Service Number 220. 


Disk Cataloger 
Fastcat/64 is a machine language disk 
cataloger for the Commodore 64, SX- 
64, and 128. It supports multiple cata- 
logs, each containing up to 1200 
entries, Fastcat/64 also provides auto- 
matic catalog updating, onscreen cata- 
log review, status reports during 
cataloging, and a variety of ways to ex- 
tract hardcopy listings of catalog en- 
tries. This software is not copy 
protected. Requires disk drive; printer 
and color monitor are optional. 

Fastcat/64 is available only by mail 
order for $20.00 . A demonstration ver- 
sion is available for $5.00. 

R. J. Biancosino, 38 S. Ogle Ave., 
Wilmington, DE 19805. 
Circle Reader Service Number 221. 
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KETEK’s Command Center for the 
Commodore 128 computer system. 





Command Center For 
Commodore 128 

Commodore 128 owners can now con- 
solidate their peripherals into one 
custom-designed unit recently released 
by KETEK. 

The Command Center is a space- 
saving cabinet that comes complete 
with its own built-in drive/CPU cool- 
ing fan, telephone/modem control 
switch, master AC switch, and AC 
power strip with six outlets. A useful 
device for uncluttering and upgrading 
the appearance of the 128 workspace, 
the Command Center is designed to 
contribute to the longevity of a C-128 
system by protecting the system from 
overheating. In addition, the Command 
Center offers line noise filtering and 
protection from voltage spikes and 
power surges. 

Suggested retail price for the Com- 
mand Center is $149.95 plus $3.50 
shipping and handling. 

KETEK, P.O. Box 203, Oakdale, IA 
52319. 

Circle Reader Service Number 222. 





Programming Tool Kit, Compiler 
SM Software has introduced Gnome 
Speed, a BASIC compiler for the Com- 
modore 128 computer, and Gnome Kit, a 
programming tool kit for the Commo- 
dore 64 and 128 computers. 

Gnome Speed compiles virtually all 
BASIC 7.0/2.0 commands and func- 








tions. Programs can be as large as 1,999 
lines; and have up to 8000 jumps and 
500 distinct variable names. A number 
of BASIC commands, such as IF- 
THEN-ELSE, are enhanced. The com- 
piler checks for coding errors, and has 
an option to list to the printer. Backups 
are possible, since the program is not 
copy-protected. 

Gnome Kit is a machine code pro- 
gram that contains programming, struc- 
turing, and debugging aids for the 64 
and 128 (64 and 128 versions on same 
disk). It contains not only BASIC aids, 
but also a full assembler/disassembler 
and editor for machine language pro- 
grammers. The programs B Facility lets 
you restructure your BASIC programs 
with RENUMBER, MERGE, and AP- 
PEND commands. FIND revises a pro- 
gram by finding variables, commands, 
text strings, and line references. HELP 
and TRACE debugging commands are 
included. 

The M Facility in Gnome Kit lets 
you create machine language programs 
with the assembler/disassembler. Code 
can be input/output as hexadecimal/ 
decimal, byte, low/high byte, or ASCII. 
Extensive restructuring and debugging 
tools are also included. The F Facility, 
for advanced programmers, offers di- 
rect access to disk drive memory and 
the disk itself. You can extend DOS 
with user routines and restore corrupt- 
ed disks, among other functions. Gnome 
Kit is not copy-protected. 

Suggested retail prices are $39.95 
for Gnome Kit and $59.95 for Gnome 
Speed. 

SM Software, Inc., P.O. Box 27, 
Mertztown, PA 19539-0027. 

Circle Reader Service Number 223, 


Software Programs 
From Mindscape 
Several new software packages for the 
Commodore 64 have been introduced 
by Mindscape. Bop’n Wrestle is a three- 
dimensional combat sports simulation 
for pro wrestling enthusiasts. Using 
either a joystick or the keyboard, one or 
two players battle for the World Cham- 
pionship Belt. 

As Captain Johnny Jimbo-Baby 
McGibbits, you must fly your Whiz- 
bang Gizmo DHX-1 Attack Chopper 








through enemy air space to reach tar- 
gets designed to destroy the Mad Lead- 
er’s military force. Three missions 
combine helicopter flight simulation 
and military ground action, You are 
aided by your flight manual, secret 
communication code names, mission 
information, weapons, film, and pocket 
edition of The McGibbits Guide to 
Ground Installation Infiltration. 

The object of Spell of Destruction is 
to enter the Castle of Illusions, find the 
Prime Elemental, and destroy it with a 
single spell. Your quest takes you 
through over 70 locations with scrolling 
3-D graphics and music, 

Great British Software, Volume I 
combines three games on one disk, In 
Brian Bloodaxe you invade Britain and 
seek the crown jewels among over 100 
puzzle-filled screens. You travel 
through 45 caverns of death and 400 
scrolling screens to fight the Monster of 
the Apocalypse in Revelation. And in 
Quovadis, you battle the Dark Lord to 
free humankind . 

Bop’n Wrestle, Infiltrator, and Spell 
of Destruction have a suggested retail 
price of $29.95 each. Great British Soft- 
ware has a retail price of $14.95, 

Mindscape, Inc., 3444 Dundee Rd., 
Northbrook, IL 60062. 

Circle Reader Service Number 224. 





Hardware From 
Master Software 


Master Software has introduced four 
hardware interconnection products for 
Commodore personal computers, You 
can place port devices in more conven- 
ient locations with Modem Master, a 
four-foot extender for the user port of 
the VIC-20, Commodore 64, SX-64, 
Plus/4, and 128. The extender is made 
of tangle-proof ribbon cable and has 
keyed connectors to prevent incorrect 
installation, 

The Modem Master Plus has all the 
features of Modem Master, plus a buff- 
ered system reset switch that resets the 
Commodore 64 and SX-64 and VIC-20 
in case of computer lock-up, There are 
programs included to help recover the 
BASIC program in memory at the time 
of the lockup. 

You can use two printers with one 
computer when you use Y-Not, a six- 
foot Y cable. Y-Not contains one male 
six-pin plug and two female six-pin 
jacks that fit the six-pin serial port of all 
Commodore computers. 

The 80 Mono Cable lets you use 
the Commodore 128’s 80-column mode 
without an RGB monitor. This six-foot 
cable plugs into the RGBI port of the 
computer and the video input jack of 
the monitor to produce an 80 column 
monochrome display on any composite 
color or monochrome monitor. 





List price for Modem Master is 
$29.95 and $34.95 for Modem Master 
Plus. Y-Not retails for $15.00 and the 
80 Mono Cable is priced at $9.00, 

Master Software, 6 Hillery Ct., Ran- 
dallstown, MD 21133. 

Circle Reader Service Number 225, 





128 Software From Abacus 
Abacus Software has released two new 
software packages for the Commodore 
128. Cadpak-128 is the 128 version of 
Cadpak-64, a computer-aided design 
(CAD) drawing and design package. 
Cadpak-128 features accurately scaled 
output, accupoint positioning, four- 
screen detail, and support of any high- 
quality lightpen. 

Super C Version 3 is the 128 version 
of Super C for the C-64. This C language 
includes complete implementation of K 
& R definition, graphics and math li- 
braries, RAM disk support, Unix-like 
shell, and machine language interface. 

Cadpak-128 and Super C Version 3 
retail for $59.95 each. 

Abacus Software, P.O, Box 7219, 
Grand Rapids, MI 49510. 

Circle Reader Service Number 226, 





Timeworks’ 128 Spreadsheet 
Timeworks has released an enhanced 
version of Swiftcalc 128 for the Commo- 
dore 128, This electronic spreadsheet 
for home and business use features 
high resolution graphics, swiftkey mac- 
ros, swift-DOS, and multi-level sorting. 
It can be interfaced with Timeworks’ 
Word Writer 128 and Data Manager 128 
and uses an 80-column monitor, 

Suggested retail price for Swiftcalc 
128 is $69.95. Backup disks for Time- 
works registered users are available for 
$14.70, 

Timeworks, 444 Lake Cook Rd., Deer- 
field, IL 60015, 
Circle Reader Service Number 227. 


New Software From Firebird 
Three new software packages are now 
available from Firebird. Colossus Chess 
IV is a two- and three-dimensional dis- 
play chess program that supports all 
rules of chess, including under-promo- 
tions, the fifty-move rule, and all draws 
by repetition, There are multiple diffi- 
culty levels as well as provisions for 
saving the games and recreating previ- 
ous board settings. The package in- 
cludes an instruction manual and 
classic game libraries on disk. A disk 
drive is required; joystick is optional. 

The Arc of Yesod is a moon-based 
action adventure in which the player 
must overcome numerous obstacles in 
order to locate and destroy a device 
buried in the lunar caverns. 





The companion adventure to The 
Arc of Yesod, The Nodes of Yesod, also 
takes place on the moon. There are sev- 
eral twists to this adventure on the op- 
posite side of the flippy disk. Both lunar 
adventures include animation, sound, 
and music, Joystick is optional, 

Colossus Chess IV has a suggested 
retail price of $34.95. The Arc of Yesod 
and The Nodes of Yesod retail for $19.95 
on one disk. 

Firebird Licensees, 74 N. Central 
Ave., Ramsey, N] 07446, 
Circle Reader Service Number 228, 





The Print Shop Companion 

The Print Shop Companion from Broder- 
bund Software adds even more design 
tools to Broderbund’s The Print Shop. 
New features include the multi-tool 
Graphic Editor+, a font editor, a border 
editor, Tile Magic, Creature Maker, Cal- 
endar Maker, and a fast load utility. 
This enhancement adds 12 new fonts, 
50 new borders, 24 numeric graphics, 
and a set of bonus graphics to The Print 
Shop. 

The Print Shop Companion for the 
Commodore 64/128 requires 64K 
memory, a disk drive, joystick, and The 
Print Shop, 

Suggested retail price is $34.95. 

Broderbund Software, Inc, 17 Paul 
Dr., San Rafael, CA 94903-2101, 

Circle Reader Service Number 229, 





Bowling Game From Access 
Compete in a bowling league with up to 
eight different bowlers with Tenth 
Frame from Access Software. This 
bowling simulator incorporates com- 
puterized scoring, sound effects, graph- 
ics, 3-D animation, and multiple levels 
of play into a bowling game for the 
Commodore 64/128. 

Tenth Frame is on disk and a joy- 
stick is required, 

Suggested retail price is $39.95. 

Access Software, Inc., 2561 S. 1560 
West, Woods Cross, UT 84087, 
Circle Reader Service Number 230, 





Two-On-Two Basketball Action 
Teamwork is the key in GBA Champion- 
ship Basketball: Two-on-Two from Ga- 
mestar. This basketball simulator 
allows one or two players to play teams 
of two against each other or the com- 
puter, Each team can take part in prac- 
tice sessions, two-on-two competition, 
or league competition in the Gamestar 
Basketball Association, 

‘A two-man team consists of a pri- 
mary player who is given a playing 
style by the computer user and a sec- 
ondary player drafted from a list of ten 
basketball superstars, Court action is 
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enhanced by graphics and background 
crowd sounds. Game statistics are com- 
piled on the sports page of the Gamestar 
Gazette. 
Available for $34.95 for the Com- 
modore 64/128. 
Gamestar/Activision, Inc,, 2350 
Bayshore Frontage Rd., Mountain View, 
CA 94043, 
Circle Reader Service Number 231. 





Little Black Book 


Data Management 
Computer Management Corporation’s 
NamePro is a database management 
program that lets you maintain a list of 
up to 500 names with addresses, phone 
numbers, and up to five comments per 
name on the Commodore 64, You can 
sort the names into eight different cate- 
gories and print the list onto cards, 
mailing labels, regular paper, or a spe- 
cial pocket-size phone book. A vinyl 
cover is included for your phone book. 

A utility program subdivides the 
database if you need to store more than 
500 names. 

NamePro retails for $24.95. 

Computer Management Corporation, 
P.O. Box 4819, Walnut Creek, CA 94596. 
Circle Reader Service Number 232. 





Machine Language Editor And 
Assembler For C-128 


Hughes Associates has announced the 
availability of the Freedom Assembler 
and Freedom Editor for the Commodore 
128. 

The Freedom Assembler-128 is a 
symbolic assembler, Its cartridge format 
allows you to leave it plugged in all the 
time if you like, even while other pro- 
grams are running. The assembler takes 
advantage of the 128’s speed and mem- 
ory capacity. It retails for $49.95. The 
Freedom Editor-128 is a companion edi- 
tor program that starts where the Com- 
modore 128 leaves off. All the resident 
128 commands plus 25 more -- like 
COPY, BINARY, RESAVE, and 
SCREEN DUMP -- simplify program- 
ming chores, It retails for $29.95. 

Both programs are also available in 
Commodore 64 format, The Freedom 
Assembler-64 is $39.95, and the Freedom 
Editor-64 is $29.95, 

Hughes Associates, 45341 Harmony 
Ln., Belleville, MI 48111. 

Circle Reader Service Number 233. 





3-D Adventure Game For 
Commodore 64 

Mindscape has announced the release 
of Fairlight, a three-dimensional graph- 
ic adventure game for the Commodore 
64. The game takes place in the mythi- 
cal Land of Fairlight, a once beautiful 
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and radiant place that has lost its magic. 
As Ivar, it is your mission to find the 
powerful Book of Light and restore the 
Land of Fairlight to its former glory. 
Fairlight will be available in August at a 
suggested retail price of $29.95. 
Mindscape, Inc., 3444 Dundee Rd., 
Northbrook, IL 60062. 
Circle Reader Service Number 234. 





Computerized Guitar Tutorial 
GIT guitar school instructors Don Mock 
and Dan Kessler have developed Big 
Ears INTERVALS, an ear training, pro- 
gram for aspiring guitarists. Accompa- 
nied by a 20-page instructional booklet, 
the program was designed to be an ef- 
fective learning tool for guitarists of all 
levels of ability. 

Guitar neck fingerboards display 
the intervals, and the 64’s 3-voice inter- 
nal synthesizer or MIDI-out capabilities 
perform them, The user inputs an an- 
swer with joystick or keyboard, and re- 
ceives an immediate CORRECT or 
INCORRECT display. To make track- 
ing progress easy and effective, a score 
graph displays intervals tested and the 
total score. Diatonic, chromatic, and 
compound intervals are taught. 

Big Ears INTERVALS is available 
for $35 plus $1.25 postage and 
handling. 

MI Instructor Series, P.O. Box 80541, 
Seattle, WA 98108. 

Circle Reader Service Number 235. 





Foreign Language Data Disks 
For Remember! 

DesignWare has released a French vo- 
cabulary disk and Spanish vocabulary 
disk for use with Remember!. Each disk 
includes over 650 words. 

Remember! is a learning tool that 
helps students study and learn facts, 
lists, or relationships in almost any sub- 
ject through various study options built 
into the program, While students can 
easily enter their own study material, 
DesignWare has received numerous re- 
quests for supplemental data disks, in- 
cluding foreign language vocabulary 
and SAT preparation, Other data disks 
are expected to be available later this 
year, 

Each of the foreign language disks 
retails for $19.95. 

DesignWare, 185 Berry St., San Fran- 
cisco, CA 94107. 

Circle Reader Service Number 236. 





Solve The Puzzle And 

Win $50,000 

Rush Ventures, the North American 
distributor of Great Britain’s popular 
Domark computer games, has an- 
nounced a contest in conjunction with 





the U.S, launch of the company’s game 
line, 

Eureka!, the first game to be re- 
leased here, consists of five linked ad- 
ventures that take the player on a 
journey through time, starting with 
prehistoric times, on to Nero's Rome, 
Arthurian Britain, World War II and 
Colditz prison, and winding up in the 
present with a 007-type spy adventure. 
The object of the game is to defeat ene- 
mies in each adventure and save the 
world from destruction. 

But solving the adventures is only 
part of the challenge. Eureka! comes 
with an illustrated booklet containing 
riddles that give clues to the final solu- 
tion. With every riddle unraveled, the 
player builds up a secret telephone 
number. The first person to discover it 
and dial it wins $50,000. (A similar con- 
test was held in the U.K., anda 15-year- 
old boy solved it.) The contest starts 
July 4, 1986, and runs for twelve 
months, 

Suggested retail price for Eureka! is 
$24.99. Rush Ventures will also be re- 
leasing several other Domark titles in 
upcoming months, including View To A 
Kill, Friday The 13th, Codename MAT II, 
and Gladiator. All are expected to retail 
for $22.99. 

Rush Ventures, Inc,, P.O. Box 8079, 
Blaine, WA 98230 
Circle Reader Service Number 237. 





Murder Mystery On 

The Mississippi 

Activision has released Murder On The 
Mississippi, a graphics-and-text adven- 
ture set on a Mississippi riverboat in the 
19th century. As Sir Charles Foxworth, 
a famous British sleuth who discovers 
that a murder has been committed, it is 
your job to find the murderer before the 
boat docks in New Orleans. 

Adam Bellin, the program’s devel- 
oper, has designed a unique user inter- 
face that is completely joystick-driven. 
During the Delta Princess’ three-day 
journey down the Mississippi, Fox- 
worth and his constant companion Re- 
gis Phelps must explore the riverboat’s 
four decks and 24 rooms where they 
will cross-examine eight colorful char- 
acters. Building the case correctly—ex- 
amining evidence and thoroughly 
questioning suspects—is a must, since a 
false accusation may result in serious 
consequences for Sir Charles. 

Murder On The Mississippi is avail- 
able for the Commodore 64 at a sug- 
gested retail price of $34.95, 

Activision, Inc., 2350 Bayshore 
Frontage Rd., Mountain View, CA 94043. 
Circle Reader Service Number 238. 





@ The first portion of ‘Disk File 
Archiver” (December 1985) was 
scrambled; the program does not 
work as listed. We regret any incon- 
venience this may have caused our 
readers. Herewith the correct list- 
ing. Type it in with the current ver- 
sion of MLX, using a starting 
address of 0801 and ending address 
of 09B8. 


801:08 G8 GB BB 9E 32 30 36 EC 
9809:31 G9 GO OB AD BA BD 82 C4 
811:02 26 18 08 4C 94 E3 A2 CC 
@819:4C AD G8 BE 32 83 BC 33 4B 
8821:03 68 
9829:A9 BD 20 D2 FF 
@831:48 26 D2 FF 68 C9 BD D® 1D 
9839:F4 26 68 09 A2 8G 6C BB 59 
@841:03 AI AO AD B9 26 1E AB OC 
9849:4C 3A 8 AS BB 85 62 A5 G7 
@851:BC 85 83 A5 B7 85 84 26 D7 
@859:ED F5 AQ 68 26 BD FF 26 2B 
@861:57 G9 20 CF FF C9 32 Bd 9C 
9869:03 4C 3A 08 C9 36 DB B2 51 
@871:28 CF FF C9 33 D® AE 26 7¢ 
@879:CF FF C9 OD DB F9 20 68 92 
9881:89 AY 20 AD 27 99 3C G3 AD 
@889:88 16 FA A4 
@891:B@ 88 Bl 62 99 3F 63 99 DB 
9899:4E 03 88 10 F5 A9 2E 8D E3 
@8A1:49 03 8D 58 G3 AD 34 BD G3 
@8A9:4A 03 AD O2 BO 8B G9 99 6F 
@8B1:3C @3 88 10 F7 AO GF A2 D9 
@8B9:3C AG 63 26 BD FF 20 57 F7 
@8C1:89 26 68 B9 AB B2 BO BS 2 
@8C9:09 99 3C 83 99 4B 63 88 O5 
@8D1:10 F4 A9 3D 8D 4B 63 AD 79 
@8D9:34 8D 4A 63 85 FE A9 33 BF 
@8E1:8D 59 83 AI 1E A2 3C AD IE 
@8E9:93 26 BD FF 26 57 69 26 CB 
O8F1:CF FF C9 32 90 
@8F9:28 68 69 28 71 B9 CE 4A EE 
8981:03 CE 59 63 AD 59 63 C9 46 
9969:38 D6 DB AY 28 BD 58 G3 BB 
6911:8D 59 83 AS 04 18 69 12 6B 
@919:A2 3C A® 03 26 BD FF 206 E7 
@921:57 69 26 68 89 AD BB B5 26 
6929:9D AO BB AD B9 26 1E AB AG 
0931:A5 FE 26 D2 FF A9 62 AB SA 
9939:A2 68 20 BA FF AS 04 A2 BF 
0941:3F AS 63 20 BD FF AQ 2B ED 
9949:A6 2D A4 2E 26 DB FF AO 7F 
9951:88 85 9D 4C 5B 88 AY OF DA 
0959:A2 08 AB 20 BA FF 20 CO AC 
0961:FF A2 OF 20 C6 FF 66 A9 AG 
9969:0F 20 C3 FF 26 CC FF 66 18 
0971:A9 68 26 BD FF 26 57 09 76 
0979:26 CF FF C9 8D DO F9 20 EB 
6981:68 09 66 86 52 36 3A 53 31 
@989:36 3A OD 91 52 45 4E 41 82 
@991:4D 45 1D 1p 1D 1D 1p 1D C5 
9999:1D 1D 1D 1D 1D 2E 60 OD AS 
@9A1:46 49 4C 45 4E 41 4D 45 SE 
99A9:26 54 4P 4F 26 4C 4F 4E DE 
69B1:47 6D 88 88 GB OB BO OO AA 








bug-swattter 


@ “The Coordinator’ (March) 
works as described. Program 5, 
“Save/Load Subroutine” does not 
properly preserve the VIC chip reg- 
isters when files are saved to disk, 
however. This does not directly af- 
fect graphics files loaded from with- 
in The Coordinator. 

Adding line 292 and modify- 
ing line 315 as shown below re- 
stores the option of directly loading 
picture files created by The Co- 
ordinator. 


MF 292 PRINT" SCREEN RETURNS T 
© DISPLAY FOR SAVE":FOR 
TD=9TO2006 :NEXT:GOSUB18 


5 

SP=1 :GOSUB165 :SF=6:PRIN 
TES" (DOWN } {RIGHT} (RVS} 
{SPACE}SAVE COMPLETED 
{OFF }":PORTD=8T02636 :NE 
XT:GOTO348 


KF 315 


Once the save/load routine 
has been fixed, you can use the fol- 
lowing stand-alone program to load 
and display any Coordinator pic- 
tures saved to tape or disk. This 
routine may be used as is, without 
any need to load The Coordinator 
or the ancillary programs, (Tape us- 
ers should change the 8 to 1 in line 
20.) 


GG 1 ON-(A=1)-2*(A=2)-3*(A=3)- 
4*(A=4)GOT020, 26, 30,40 

BH 2 PRINTCHRS$ (147): INPUT" 
{Down} (RIGHT ENTER COORD 
(SPACE ] FILENAME"; N$ 

CD 3 PRINT" (DOWN) (RIGHT } PRESS 
(SPACEJM IF MULTICOLOR, N 
IF Nor" 

AF 4 GETR$:IFR$<"M"ORRS> "N"THE 
Na 

BH 5 M=ASC(R$)-76:PRINT" {DOWN} 
(RIGHTJPRESS BANK (6,1,2, 
3)" 


CH 6 GETBA$:IFBAS=""THENG 

EF 7 BA=ASC(BA$) :IFBA<480RBA>5 
1 THENG 

EB 8 BA=BA-48 

20 A=A+1:P$=STR$(A):PS=RIGH 

TS$(P$,1) :LOADP$+N$,8,1 

EA 30 IF A=3ANDM=1THEN20 

EK 40 POKES6576, (PEEK(56576)AN 
D252)OR(3-BA) 

AE 58 GOTOS8 








Modifications and Corrections 


@ Some readers have had difficulty 
using the Find (SHIFT-F) command 
in ‘‘Mini-Filer,”’ The program 
searches forward in memory, so 
before using Find, you should go to 
the first record in the file. SHIFT-F 
will find the first record that match- 
es. If you use the command a sec- 
ond time, it will find the second 
record, and so on. The reason Mini- 
Filer doesn’t automatically start at 
the beginning of the file is that if it 
did so, it would find only the first 
match (the first Johnson entry, but 
not any other Johnsons, for 
example). 

Reader Timothy W. Williams 
has suggested that the screen color 
combination is not ideal, especially 
if you use a television. To change 
Mini-Filer, he suggests POKEing 
2062 with your preferred border 
color and POKEing 2084 with a dif- 
ferent screen color. 


© A portion of line 0869 is missing 
from “Meteor Strike” (July): 


9869:08 DB 18 7D 36 BB BD OB 75 


© An extraneous question mark ap- 
pears in “Directory Filer’ (April). 
The last command on line 1040 
should be GOTO 840, not GOTO 
8470. Also, some readers were sty- 
mied by the {STOP} in line 880. 
This is the unshifted RUN/STOP 
key. When typed inside quotation 
marks, {STOP} appears as a re- 
versed letter C. Finally, Plus/4 us- 
ers who were unable to type {F1}, 
because of the Plus/4’s predefined 
function keys, should use the KEY 
command to change fl to CHR$ 
(133). For more details about KEY, 
see this month’s ‘’Gazette Feed- 
back.” 


@ “TurboCopy” (April) works as 
published with the 1541 disk drive, 
for which it was designed, but does 
not work with the 1571. e 
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COMPUTE"s GAZETTE 
Author Guide 


Here are some suggestions which serve to improve 
the speed and accuracy of publication for prospective 
authors. COMPUTE!'s GAZETTE is primarily interested in 
new and timely articles on the Commodore 128, 64, 
Plus/4, 16, and VIC-20. We are much more concerned 
with the content of an article than with its style, but 
articles should as be clear and well-explained as 
possible. 

The guidelines below will permit your good ideas 
and programs to be more easily edited and published: 

1. The upper left corner of the first page should 
contain your name, address, telephone number, and 
the date of submission. 

2. The following information should appear in the 
upper right corner of the first page. If your article is 
specifically directed to one model of computer, please 
state the model name. In addition, please indicate the 
memory requirements of programs, 

3. The underlined title of the article should start 
about 2/3 of the way down the first page. 

4. Following pages should be typed normally, 
except that in the upper right corner there should be 
an abbreviation of the title, your last name, and the 
page number. For example: Memory Map/Smith/2. 

5, All lines within the text of the article must be 
double- or triple-spaced. A one-inch margin should be 
left at the right, left, top, and bottom of each page. No 
words should be divided at the ends of lines. And 
please do not justify. Leave the lines ragged. 

6, Standard typing or computer paper should be 
used (no erasable, onionskin, or other thin paper) and 
typing should be on one side of the paper only 
(upper- and lowercase). 

7. Sheets should be attached together with a 
paper clip. Staples should not be used. 

8, If you are submitting more than one article, 
send each one in a separate mailer with its own tape 
or disk. 

9. Short programs (under 20 lines) can easily be 
included within the text. Longer programs should be 
separate listings. It is essential that we have a copy of 
the program, recorded twice, on a tape or disk. If your 
article was written with a word processor, we also 
appreciate a copy of the text file on the tape or disk. 
Please use high-quality 10 or 30 minute tapes with 
the program recorded on both sides. The tape or disk 
should be labeled with the author's name and the title 
of the article. Tapes are fairly sturdy, but disks need 
to be enclosed within plastic or cardboard mailers 
(available at photography, stationery, or computer 
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supply stores). 

10, A good general rule is to spell out the numbers 
zero through ten in your article and write higher 
numbers as numerals (1024). The exceptions to this 
are; Figure 5, Table 3, TAB(4), etc. Within ordinary 
text, however, the zero through ten should appear as 
words, not numbers. Also, symbols and abbreviations 
should not be used within text: use “and”’ (not &), 
“reference” (not ref.), “through” (not thru). 

11. For greater clarity, use all capitals when refer- 
ring to keys (RETURN, CTRL, SHIFT), BASIC words 
(LIST, RND, GOTO), and the language BASIC. Head- 
lines and subheads should, however, be initial caps 
only, and emphasized words are not capitalized. If 
you wish to emphasize, underline the word and it will 
be italicized during typesetting. 

12. Articles can be of any length—from a single- 
line routine to a multi-issue series. The average article 
is about four to eight double-spaced, typed pages. 

13, If you want to include photographs, they 
should be either 5X7 black and white glossies or 
color slides. 

14. We do not consider articles which are submit- 
ted simultaneously to other publishers. If you wish to 
send an article to another magazine for consideration, 
please do not submit it to us, 

15. COMPUTE!'s GAZETTE pays between $70 and 
$800 for published articles. In general, the rate reflects 
the length and quality of the article, Payment is made 
upon acceptance. Following submission (Editorial 
Department, COMPUTE!'s GAZETTE, P.O. Box 5406, 
Greensboro, NC 27403) it will take from two to four 
weeks for us to reply. If your work is accepted, you 
will be notified by a letter which will include a con- 
tract for you to sign and return, Rejected manuscripts 
are returned to authors who enclose a self-addressed, 
stamped envelope, 

16. If your article is accepted and you have since 
made improvements to the program, please submit an 
entirely new tape or disk and a new copy of the article 
reflecting the update. We cannot easily make revisions 
to programs and articles. It is necessary that you send 
the revised version as if it were a new submission 
entirely, but be sure to indicate that your submission 
is a revised version by writing, “Revision’’ on the 
envelope and the article. 

17. COMPUTE!’s GAZETTE does not accept unsolicited 
product reviews. If you are interested in serving on 
our panel of reviewers, contact our Features Editor for 
details. 








‘Each month, COMPUTE!’s GAZETTE 
‘publishes programs for the Com- 
modore 128, 64, Plus/4, 16, and 
VIC-20, Each program is clearly 
marked by title and version. Be sure 
to type in the correct version for 
your machine, All 64 programs run 
on the 128 in 64 mode, Be sure to 
read the instructions in the corre- 
sponding article, This can save time 
and eliminate any questions which 
might arise after you begin typing, 

We frequently publish two 
programs designed to make typing 
easier; The Automatic Proofreader, 
and MLX, designed for entering 
machine language programs. . 

When entering a BASIC pro- 
gram, be especially careful with 
DATA statements as they are ex- 
tremely sensitive to errors, A 
mistyped number ina DATA state 
ment can catise your machine to 
“Jock up’ (you'll have no control 
over the computer), If this happens, 
the only recourse is to turn your 
computer off then back on, erasing 
whatever was in memory. So be 
Sure to save a copy of your program 
before you run it, If your computer 
crashes, you can always reload the 
program and look for the error. 
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| How To TypeIn 
COMPUTE!s GAZETTE Programs 
RRR 


Special Characters 

Most of the programs listed in each 
issue contain special control. charac- 
ters, To facilitate typing in any pro- 
grams. from the GAZETTE, use the 
following listing conventions. 

The most common type of con- 
trol characters in our listings appear 
as words within braces: {DOWN} 
means to press the cursor down 
key; {5 SPACES} means to press 
the space bar five times, 

To indicate that a key should 


be shifted (hold down the SHIFT 


key while pressing another key), 
the character is underlined. For ex- 
ample, A means hold down the 
SHIFT key and press A, You may 
see strange characters on your 
screen, but that’s to be expected. If 
you finda number followed by an 
underlined key enclosed in braces 
(for example, {8 A}), type the key 
as many times as indicated (in our 
example, enter eight SHIFTed A‘s). 

Ifa key. is enclosed in special 
brackets, & 9, hold down the 
Commodore key (at the lower left 
corner of the keyboard) and press 
the indicated character. 

Rarely, you'll see a single letter 
of the alphabet enclosed in braces, 


When You Read: 


z 


Press: 



























































——_——_—_ 


This. can be entered on the Com- 
modore 64 by pressing the CTRL 
key while typing the letter in 
braces, For example, {A} means to. 
press CTRL-A. 


The Quote Mode 
Although you can move the cursor 
around the screen with the CRSR 
Keys, often'a programmer will want 
to move the cursor under program 
control, This is seen in. examples 
such as {LEFT} and: {HOME} in 
the program listings. The only way 
the computer can tell the difference 
between direct and programmed 
cursor control is the quote mode. 
Once you press the quote key, 
you're in quote mode. This mode 
can be confusing if you mistype a 
character and cursor left to change 
it, You'll see a reverse video charac- 
ter (a graphics symbol for cursor 
left), In this case, you can use the 
DELete key to back up.and edit the 
line. Type another quote and you're 
out of quote mode. If things really. 
get confusing, you can exit quote 
mode simply by pressing RETURN, 
Then just cursor up to the mistyped 
line andl fix it. 














When You Read: Press: 
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The Automatic Proofreader 





Philip I, Nelson, Assistant Editor 


“The Automatic Proofreader’’ helps 
you type in. program listings for the 
128, 64, Plus/4, 16, and VIC-20 and 
prevents nearly every kind of typing 
mistake, 

Type in the Proofreader exactly as 
listed. Since the program can’t check it- 
self, type carefully to avoid mistakes. 
Don’t omit any lines, even if they con- 
tain unfamiliar commands, After finish- 
ing, save a copy or two on disk or tape 
before running it, This is important be- 
cause the Proofreader erases the BASIC 
portion of itself when you run it, leav- 
ing only the machine language portion 
in memory. 

Next, type RUN and press RE- 
TURN. After announcing which com- 
puter it’s running on, the Proofreader 
displays the message “Proofreader 
Active”, Now you're ready to type in a 
BASIC program. 

Every time you finish typing aline 
and press RETURN, the Proofreader 
displays a two-letter checksum in the 
upper-left corner of the screen, Com- 
pare this result with the two-letter 
checksum printed to the left of the line 
in the program listing. If the letters 
match, it’s almost certain the line was 
typed correctly. If the letters don’t 
match, check for your mistake and cor- 
rect the Jine, 

‘The Proofreader ignores spaces not 

“enclosed in quotes, so you can omit or 

add spaces between keywords and still 
see a matching checksum, However, 
since spaces inside quotes are almost al- 
ways significant, the Proofreader pays 
attention to them, For example, 10 
PRINT“ THIS IS BASIC” will generate 
a different checksum than 10 
PRINT’THIS ISBA SIC”, 

A common typing error is transpo- 
sition—typing two successive charac- 
ters in the wrong order, like PIRNT 
instead of PRINT or 64378 instead of 
64738, The Proofreader is sensitive to 
the position of each character within the 
line and thus catches transposition 
errors, 

The Proofreader does not accept 
keyword abbreviations (for example, ? 
instead of PRINT). If you prefer to use 
abbreviations, you can still check the 
line by LISTing it after typing it in, 
moving the cursor back to the line, and 
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pressing RETURN, LiSTing the line 
substitutes the full keyword for the ab- 
breviation and allows the Proofreader 
to work properly. The same technique 
works for rechecking programs you've 
already typed in. 

If you’re using the Proofreader on 
the Commodore 128, Plus/4, or 16, do 
not perform any GRAPHIC. commands 
while the Proofreader is active. When 
you perform a command like GRAPH- 
IC 1, the computer moves everything at 
the start of BASIC program space—in- 
cluding the Proofreader—to another 
memory area, causing the Proofreader 
to crash, The same thing happens if you 
run any program with a GRAPHIC 
command while the Proofreader is in 
memory, 

Though the Proofreader doesn’t 
interfere with other BASIC operations, 
it’s a good idea to disable it before run- 
ning another program. However, the 
Proofreader is purposely difficult to dis~ 
lodge: It's not affected by tape or disk 
operations, or by pressing RUN/ 
STOP- RESTORE, The simplest way to 
disable it is to turn the computer off 
then on, A gentler method is to SYS to 
the computer's built-in reset routine 
(SYS 65341 for the 128, 64738 for the 
64, 65526 for the Plus/4 and 16, and 
64802 for the VIC), These reset routines 
erase any program in memory, so be 
sure to save the program you're typing 
in before entering the SYS command, 

If you own a Commodore 64, you 
may already have wondered whether 
the Proofreader works with other pro- 
gramming utilities like “MetaBASIC,’” 
The answer is generally yes, if you’re 
using a 64 and activate the Proofreader 
after installing the other utility. For ex- 
ample, first load and activate Meta- 
BASIC, then load and run the 
Proofreader, 

When using the Proofreader with 
another utility, you should disable both 
programs before running a BASIC pro- 
gram. While the Proofreader seems un- 
affected by. most utilities, there’s no 
way to promise that it will work with 
any and every combination of utilities 
you might want to use. The more utili- 
ties activated, the more fragile the sys- 
tem becomes. 


The New Automatic Proofreader 


16 VEC= (-722)+256* PEEK (773) 
2LO=43 2H1=44 














20° PRINT “AUTOMATIC PROOFREADE 
R FOR "7 :1F VEC=42364 THEN 
{SPACE}PRINT "C-64" 

3@ IF VEC=50556 THEN. PRINT 
c-20" 

46 I VEC=35158 THEN. GRAPHIC C 
LR PRINT "PLUS/40& 16" 

5@ TF VEC=17165. THEN LO=45:HT= 
46:GRAPHIC CLR: PRINT" 128" 

69 SA=(PEEK (LO) +256*PEEK(HT)) + 
6: ADR=SA 

7@ FOR J=0. 70 166:READ. BYT:POK 
E ADR, BYT: ADRADR+1 :CHK=CHK 
4+BYT2NEXT . 

80 IF CHK<> 20570 THEN) PRENT. 
ERROR* CHECK TYPING IN. DATA 

STATEMENTS": END. 

90 FOR J=1 TO. 5:READ RF,LE,HE: 
RS=SA+RE;HB=INT(RS/256) :LB= 
RS~(256*HB) 

100 CHK=CHK+RE+LE+HE: PORE. SAH 
FP, LB:POKE SAtHE, HB:NEXT 

118 IF CHK<> 22054 THEN PRINT." 
*ERROR* RELOAD. PROGRAM: AND. 
(SPACE) CHECK PINAL INE" SEN, 
D 


"NE 








120 POKE SA+149, PEEK (772) 2POKE 
SA+150, PEEK(773) 

130 IF VEC=17165.\ THEN. POKE SA+ 
14,22: POKE SA+18,23:POKESAt 
29.224: POKESA+139) 224 

148 PRINT. CHRS (147) 7 GIRS (7) 
PROOFREADER) ACTIVE": SYS SA 

150 POKE HI, PREK(HE)+1sPOKE (P. 
BEK(LO)4256*PEEK(H1)) “1 ,02N 
EW 

168 DATA 120,169,273, 141,4, 3,16 
9,3,141,5,3 

178. DATA 88,96,165, 20,133,167), 
165, 21,133) 168) 169 

180 DATA G,141,0,255,162,31,18 
1,199,187,227,3 

190. DATA 202,16, 248,169,194 32, 
210, 255,169,18,32 . 

208 DATA 210,255,160,0,132,180 

1132)176136, 230,180 

PATA, 200,185,0,2,240,46) 20 

1) 34,2088, 72 

220 DATA 165,176,73,255,133,17 
6,104, 72,201, 32), 208 

230. DATA 7,165,176, 208, 3,104) 2 
08,226,104,166,180. 

240 DATA 24,165,167) 121,0, 2,13 
37167,165, 168,105. 

250 DATA 0,133,168, 202,208,239 
1240, 262,.165,167,69 

260 DATA 168,72,41,15,168,185,, 
211,.9)32)210, 255 

278 DATA 104,74,74,24, 74,168, 1 
85,211)3,32)210 

280. DATA 255,162, 31,189,227) 35 
149,199,202,16,248 

298 DATA 169,146, 32,218,255,76° 
186,137,65,66,67 

300, DATA 68,69,70,71,72,74,75, 
77,80, 81,82,.83,88 

318. DATA 13,.2,7,167,31,32,151, 


116,117,151,128,129) 167/136. 
+137 
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Ottis R. Gowen Technical Editor 


“MLX‘“is a labor-saving utility that 
allows almost fail-safe entry of 
“machine language programs. Included 
e versions for the Commodore 64 
ind 128, 









| Type'in. and save some copies of which- 
ever version of MLX is appropriate for 
your computer (you'll want to use it to 
enter future ML programs from COM- 
PUTE!s GAZETTE), Program 1 is for the 
Commodore 64, and Program 2 is for 
the 128 (128 MLX can also. be used to 
‘enter Commodore 64 ML programs for 
‘use in'64 mode), When you're ready to 
enter\an. ML program, load: and ran 
MLX, Itasks you for a:starting address 
and an ending address. These addresses 
appear in the article accompanying the 
MLX-format program listing you‘re 
typing. 

Tf you're unfamiliar with machine 
language, the addresses (and all other 
values. you enter in MLX) may appear 
strange, Instead of the usual decimal 
numbers you're accustomed to, these’ 
numbers are in hexadecimal—a base 16 
numbering system commonly used by 
“ML programmers, Hexadecimal—hex 
for short—includes the numerals 0-9 
and the letters A-F, But don’t worry— 
even if you know nothing about ML or 
“hex; you should’ have no trouble using 
MLX, 

After you enter the starting and 
‘ending addresses, you'll be offered the. 
option of clearing the workspace. 
Choose this option if you're starting to, 
enter'a new Jisting, If you‘re continuing 
a listing that’s partially typed from a 
previous session, don’t choose this 
‘option, 

‘A functions menu will appear, The 
first option in the menu is ENTER 
DATA, If you're just starting to type in. 
a program, pick this, Press the E key, 
and’ type the first number in the first 
line of the program listing. If you've al- 
ready typed in part of a program, type 
the line number where you left off typ- 

ing at the end of the previous session’ 
(be sure to.load the partially completed 
program before you resume entry). In 
any case, make sure the address you en- 
“ter corresponds to the address of a line 
in the listing, you are entering. Other- 
wise, you'll be unable to enter the data 
correctly. If you pressed E by mistake, 
you can return to the command menu 
by pressing RETURN alone when 
asked forthe address. (You can get back 
‘to the menu from most options by 
[Speeseine: RETURN with no other input.) 











Machine Language Entry Program 
For Commodore 64 and 128 





Entering A Listing 
Once you're in: Enter mode, MLX prints 
the address for each program line for 
you, You then type in all nine numbers 
on that line, beginning with the first 
two-digit number after the colon (:), 
Each line represents eight data bytes 
and a checksum, Although an MLX- 
format listing appears similar to the 
“hex dump’ listings from a machine 
language monitor program, the extra 
checksum number on. the end allows 
MEX to check your typing, (Commo- 
dore 128 users can enter the data from 
an MLX listing using the built-in moni- 
tor if the rightmost column of data is 
omitted, but we recommend against it, 
It's much easier to|let MLX do the proof- 
reading and error checking for you,) 
When you enter a line, MLX recal- 
culates the checksum from the eight 
bytes and the address and compares. 
this value to the number from the ninth 
column. If the values match, you'll hear 
a bell tone, the data will be added to the 
workspace area, and the prompt for the 
next line of data will appear, Butif MLX 
detects a typing error, you'll hear a low 
buzz and see an error message, The line 
will then be redisplayed for editing, 


Invalid Characters Banned 


Only a few keys are active while you're 
entering data, so you may have to un- 
learn some habits. You do not type 
Spaces between the columns; MLX 
automatically inserts these for you. You 
do not press RETURN after typing the 
last number in a line; MLX automatical- 
ly enters and checks the line after you 
type the last digit. 

Only the numerals 0-9:and the let- 
ters A-F can be typed in. If you press 
any other key (with some exceptions 
noted below), you'll hear a warning 
buzz. To simplify typing, 128 MLX re- 
defines the function keys and + and = 
keys on the numeric keypad so that you 
can enter data’ one-handed. (The: 64 
version incorporates the keypad modi- 
fication: from: the March 1986 “‘Bug- 
Swatter’” column, lines 485-487.) In 
either case, the keypad is active only. 
while entering data, Addresses must be 
entered with the normal letter and 
number keys, The figures below show 
the keypad configurations for each 
version: 

MLX checks for transposed charac- 
ters. If you're supposed to type in’ AO 
and instead enter 0A, MLX will catch 
your mistake, There is one error that 








64 MLX Keypad 





128: MLX Keypad 


TOC 
A B Cc 
(F1) (F3) (F5) 






































can slip past MLX: Because of the 
checksum formula used, MLX won't 
notice if you accidentally type FE in 
place of 00, and vice versa, And there’s 
a very slim chance that you could gar- 
blea line and still end up witha combi- 
nation of characters that adds up to the 
proper checksum, However, these mis- 
takes should not occur if you take rea- 
sonable care while entering data. 


Editing Features 

To. correct typing mistakes. before: fin- 
ishing a line, use the INST/DEL key to 
delete: the character to the \left-of the 
cursor, (The cursor-left, key also. de- 
letes.) If you mess up a line really badly, 
press CLR/HOME to start the line over, 
The RETURN key is also active, but 
only before any data is typed on a line, 
Pressing RETURN at this point returns 
you to the command menu, After you 
type a character of data, MLX disables 
RETURN until the cursor returns to the 
start of a line. Remember, you can press 
CLR/HOME to quickly get to a line 
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number prompt, 

More editing features are available 
when. correcting lines in which MLX 
has detected an error. To make correc- 
tions in a line that MLX has redisplayed 
for editing, compare the line on the 
screen with the one printed in the list- 
ing, then move the cursor to the mis- 
take and type the correct key, The 
cursor Jeft and right keys provide the 
normal cursor controls. (The INST/ 
DEL key now works as an alternative 
cursor-left key.) You cannot move left 
beyond the first character in the line, If 
you try to move beyond the rightmost 


character, you'll reenter the line. Dur- | 


‘ing editing, RETURN is active; pressing 
it tells MLX to recheck the line. You can 
press the CLR/HOME key to clear the 
entire line if you want to start from 
scratch, or if you want to get toa line 
number prompt to use RETURN to get 
back to the menu, 


Display Data 

The second menu choice, DISPLAY 
DATA, examines memory and shows 
the contents in the same format as the 
program listing (including the check- 
sum). When you press D, MLX asks you 
for a starting address. Be sure that the: 
starting address you give corresponds 
to.a line number in the listing. Other- 
wise, the checksum display will be 
meaningless. MLX displays program 
lines until it reaches the end of the pro- 
gram, at which point the menu is redis- 
played. You can pause the display by 
pressing the space bar. (MLX finishes 
printing the current line before halting.) 
‘Press space again to restart the display. 
To break out of the display and get back 
to the menu before the ending ES 
is reached, press RETURN. 


Other Menu Options 
Two more menu selections let you save 
programs and load them back into the 
computer. These are SAVE FILE and. 
LOAD FILE; their operation is quite 
straightforward. When you press S or L, 
MLX asks you for the filename. You'll 
then be asked to press either D or T to 
select disk or tape. 

You'll notice the disk drive starting 
and stopping several times during a 


load or save (save only for the 128 ver~ 


sion). Don’t panic; this is normal be- 
havior. MLX opens and’ reads from-or 
‘writes to the file instead of using the 
usual LOAD and SAVE commands 
(128 MLX makes use of BLOAD). Disk 
users should also note that the drive 
prefix 0: is automatically added to the 
filename (line 750 in 64 MLX), so this 
should not be included when entering. 
thename, This also precludes the use of 
@ for Save-with-Replace, so remember 
to give each version you save a different 
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name, The 128 version makes up for 
this by giving you the option of scratch- 
ing the existing file if you want to reuse 
a filename, 

Remember that MLX saves the en- 
tire workspace area from: the starting 
address to the ending address, so the 
save or load may take longer than you 
might expect if Ye ve entered only a 
small amount of data from a long list- 
ing. When saving.a partially completed 
listing, make sure to note the address 
where you stopped typing so you'll 
Know where. to resume entry when you 
reload. 

MLX reports the standard disk or 
tape error messages if any problems are 
detected during the save or load. (Tape 
users should bear in mind that Commo- 


\dore computers are never able to detect 


errors during a save to tape.) MLX also 
has three special load error messages: 
INCORRECT STARTING ADDRESS, 
which means the file you're: tryin; ng to 
load does not have the starting address 
you specified when you ran MLX; 
LOAD ENDED. AT address, which 
means the file: you're trying to Joad 
ends before the ending address you 
specified when you started MLX; and 
TRUNCATED AT ENDING AD- 
DRESS, which means. the file you're 
trying to load extends beyond the end- 
ing address you specified when you 
started MEX. If you see one of these 
messages and feel certain that you've 
loaded the right ‘file, exit and rerun 
MLX, being careful to-enter the correct 
Starting and ending addresses. 

The 128 version also has a CATA~ 
LOG DISK option so you can view the 
contents of the disk directory before 
Saving or loading. 

The QUIT menu option has the ob- 
vious effect—it stops MLX and enters 
BASIC, The RUN/STOP key is dis- 
abled, so the Q option lets you exit the 
program without turning off the com- 
puter. (Of course, RUN/STOP-RE- 
STORE also. gets: you out.) You'll be 
asked for verification; press Y to exit to 
BASIC, or any other Key to return to the 
menu. After quitting, you can type 
RUN again and reenter MLX: without 
losing your data, as long as you don’t 
use the clear workspace option, 


The Finished Product 

When you've finished typing. all the 
data for an ML program and saved your 
work, you're ready to see the results, 
The instructions for loading and using 
the finished product vary from program 
to program. Some ML programs are de- 
signed to be loaded and run like BASIC 
programs, so all you need to type is 
LOAD “filename™;8 for disk (DLOAD. 
“filename” on the 128) or LOAD “file- 
name" for tape, and then.RUN. Such 





programs will usually have a starting 
address of 0801 for the 64 or 1C01 for 
the 128, Other programs must be re- 
loaded to specific addresses with a com- 
mand such as LOAD “filename"’,8,1 for 
disk (BLOAD. ‘filenarne® on the 128) or 
LOAD “‘filename’1,1 for tape, then 
started with a SYS to a particular mem- 
ory address. On the Commodore 64, 
the most common starting address for 
such programs is 49152, which corre- 
sponds to MLX address C000. In either 
case, you should always refer to the ar- 
ticle which accompanies the ML listing 
for information on ERR and running 
the program, 


An Ounce Of Prevention 

By the time you finish typing in the data 
for a long ML program, you may have 
several hours invested in the project: 
Don’t take chances—use our “‘Auto- 
matic Proofreader’’ to type the new 
MLX, and then test your copy thorough- | 
ly before first using it to enter any sig- 
nificant amount of data, Make sure all 
the menu options work as they should, 
Enter fragments of the proeam starting 
at several different addresses, then use 
the Display option to verify that the 
data has been entered correctly, And be 
sure to test the Save and Load options 
several times to ensure that you can re- 
call your work from disk or tape. Don’t 
Jet a simple typing error in the new 
MLX cost you several nights of hard 
‘work, 


Program 1: MLX For Commodore 
64 


SS 10 REM VERSION 1.1: LINES 8 
30,950 MODIFIED, LINES 4 
85-487 ADDED 

POKE 56,58:CLR«DIM INS). | 
I,J, Ay By AS, BSP A(7) INS 
CaadaicOn]6 :C7=7122—212 
4254 1Z5=255326=256127= 
127 
PA=PEEK(45)+Z6*PEEK (46) 
3BS=PEEK(55)+Z6*PEEK(56 
) sHS="0123456789ABCDEF" 
RS=CHRS (13) 2L$=" (LEFT) 
S$" ":DS=CHRS (20) 25 
CHRS(®)2T$="(13 RIGHT)" 
$D=54272:FOR ISD. TO SD. 
4233:POKE I, 0:NEXT:POKE 
{SPACE}SD+24,15:POKE 78 
By 52 

PRINT" (CLR)"CHRS (142) CH, 
R$(8):POKE 53280,15:POK 
E 5328115 

PRINT. TS") {RED} (RVS) 

(2 SPACES) £8 @3 

(2 SPACES} "sPC( 28)" 

{2 SPACES} (OFF) {BLU} ML. 
X11 (RED) {RVS} 

{2 SPACES}"spc(28)" 

{12 SPACES) { SLU)" 
PRINT" (3. DOWN} 

{3 SPACES]COMPUTE!'S MA 
CHINE LANGUAGE EDITOR 
{3 DOWN)" 
PRINT" {BLK) STARTING ADD. 


EK 168 
DM 110 


co 128 


SB 130 


158 


Eg 160 


FR 178 


JB 188 

















“GF 


“KR 





198 
208 


218 


228 


238 


249 


258 
268 


278 


“260 


298. 
308 


KF 318 


Ge 


38S 


328 
338 


349 
359 


360 


2 3708 


388 
398 
400 


418 
420 


436 
440 


450 


465 


470° 


480 
485 


RESS£43"; :GOSUB308:SA=A 
D:GOSUB1940:IF F THEN1G. 
rs 

PRINT" {BLK} (2 SPACES }EN 
DING ADDRESS£43";:GOSUB 
300 :EA=AD:GOSUB1030:1F 
{SPACEJF THEN190 


INPUT" {3 DOWN} {BLK]CLEA 


R WORKSPACE [Y/N]E43";A. 
$:IF LEPTS$(AS,1)<>"Y"TH 
“] 


VEN221 


PRINT"{2 DOWN} {BLU} WORK 
ING... .";:FORI=BS TO BS+ 
EA-SA+7:POKE I,0:NEXT:F 
RINT"DONE” 
PRINTTAB(10)"{2 DOWN} 
{BLK}{RVS] MLX. COMMAND, 
(SPACE JMENU. {DOWN} E43": 





PRINT 'T$"({RVSJE(OPP}NTE 


R DATA" 
PRINT TS" {RVSJD{OFFJISP 
LAY DATA":PRINT TS“ 
{RVSJL{OrFJOAD FILE" 
PRINT TS" eneaeane 
FILE":PRINT T: 
{orpr}urr(2 DOWN {BUR} 
GET AS:IF AS=N$ THEN250 
A=@:FOR I=] TO 5:1F AS= 
MID$(“EDLSQ",I,1)THEN A 
=ItIe5. 
NEXT:ON A GOTO420,61,6 
98,780, 280:GOSUB1660:GO 
T0258, 
PRINT"(RVSJ QUIT. "2 INPU. 
T"(DOWN}E43ARE YOU SURE 
CY/N]";ASiIP LEFTS(AS, 
1) <2"¥"THEN220 
POKE SD+24,8:END 
INS=N$ :AD=0 : INPUTINS : IP 
LEN (INS) <>4THENRETURN 
BS=INS :GOSUB320:AD=A:BS. 
=MIDS$ (INS, 3) :GOSUB326:A 
D=AD*256+A: RETURN 
A=B:FOR J=1 TO 2:A$=MID 
$(BS,0,1) 2B=ASC(AS)—Ca+ 
(A$? "@") *C7 :A=A*C64B 
IF B<@ OR B>15 THEN AD= 
@:AS-1:5=2 
NEXT: RETURN 
B=INT(A/C6) :PRINT MID$( 
H$,B+1,1); :B=A-B*C6:PRI 
NT MID$(HS,B+1,1);?RETU 





RY 
A=INT(AD/Z6) sGOSUB350:A 
BERS PRINT 
ck= iNT (AD/26) 3CK=AD-24* 
CK+Z5* (CK>Z7) :GOTO399 
CK=CK*Z24+2Z5* (CK>Z7) +A. 
CK=CK425* (CK>Z5) :RETURN 
PRINT" {DOWN }STARTING AT 
£43"; :GOSUB300:IP INS<> 
NS THEN GOSUB1930:IF F 
{SPACE} THEN49O 

RETURN 

PRINT" {RVS} ENTER. DATA 
{SPACE}":GOSUB490:IF IN 
S=NS$_ THEN220 
OPEN3,3:PRINT 
POKE198,@;GOSUB360:1F F 
THEN PRINT INS:PRINT" 
{UP} {5 RIGHT} "; 

FOR I=8 TO 24 STEP 3:85 
=8$:FOR J=l TO.23:1F FT 
HEN BS=MID$ (INS, I+3,1) 
PRINT" {RVS}"BSLS731F I< 
24THEN PRINT" {OFF} "7 
GET AS$:IP AS=NS\ THEN470, 
IP (AS>"/"ANDAS<":")OR(A 
$2"@"ANDAS<"G") THEN548. 
As=(AS="M")=2*(AS=",")~ 








cM 


MP. 


Ke 


GK 


Qs 


oc 


PK 


GQ 
QA 


KS 


486 


487 


490 


508 


3*(AS=".")-4*(AS="/")-5, 
* (AS="3")-6* (AS="K") 
A=A-7* (AS="L")-8*(AS="2 
“)-9* (AS="U")=1) 
SERRE 
pr 

A=A-13*(AS=8$):1F A THE 
N_AS=MIDS("ABCD123E456F 
@",A,1)2GOTO 540 

IF AS=RS ESR 
=1)OR F)THEN PRINT BS; 
S=2:NEXT:1=242GOTO559 
IF \AS="{HOME}" THEN PRI 
NT_BS$2J=2:NEXT:1=24: NEX 





_ TrF=0:GOTO446 


518 
520 


538 


548 


550 


568 


578 


580 


598 


600 
618 


628 


638. 


649 
658 


6608 
678 
68a 


“698 


708 
718 


728 F=0: 


IF (AS="{RIGHT)")ANDF TH 
ENPRINT B$L$;:GOTOS40 
IF A$<>L§\ AND A$<>D$_ OR 
((1=8)AND(J=1) ) THEN GOS 
UB1968:GOTO476 
AS=L§+SS$+L$:PRINT. BSLS; 
33=2-J:1F J THEN PRINT 
{SPACE}LS;21=1-3 
PRINT AS; iNEXT J: PRINT. 
{SPACE} S$; 
NEXT |I:PRINT: PRINT" (UP} 
{5 °RIGHT)";sINPUT#3, INS 
IF INS=NS. THEN CLOSE3= 
GOTO228 
FOR I=1 TO 25 STEP3:BS$= 
MIDS (IN$,1) :GOSUB326:1F 
I<25 THEN GOSUB388:A(T 
/3)=A 
NEXT:IF A¢>CK THEN GOSU, 
B1660:PRINT" {BLK}. (RVS}, 
(SPACEJERROR: REENTER L 
INE £43":P=1:GOT0440 
GOSUB10803B=BS+AD-SA: FO 
R I=@\TO.7:POKE ‘BtI,A(I 
J2NEXT. 
AD=AD+8:IF AD>EA THEN C 
LOSE3 :PRINT" {DOWN} {BLU} 
** END OF ENTRY ** {BLK} 
{2 DowN}":GOTO785 
F=6 :GOTO449 . 
PRINT" {CLR} {DOWN} [RVS} 
(SPACE) DISPLAY DATA .":G 
OSUB490:IF INS=N$ ‘THEN2 
28 
PRINT (DOWN) (BLU} PRESS? 
{RVS}SPACE{OFF} TO’ PAU 
SE, (RVS}RETURN{ OFF }\TO 
BREAKE43{DOWN)." 
GOSUB360 :B=BS+AD-SA:FOR 
I=BTO B+7:A=PEEK(I) GOS 
UB350:GOSUB386:PRINT SS 


3 

NEXT: PRINT" {RVS}"72A=CK 
:GOSUB35@:PRINT 
P=1:AD=AD+8:1F AD>EA TH 
ENPRINT" {DOWN ) {BLU} ** E 
ND. OF. DATA: **":GOTO228 
GET AS$:IF \AS=R§ ‘THEN GO 
SUB1 B80 :GOTO226 

IF A$=S$\ THEN F=F+1:GOS. 
UB1080 

ONPGOTO630, 660,630 
PRINT" {DOWN} {RVSJ\ LOAD 
{SPACE }DATA) “:0P=1:GOTO. 


718 SS 
PRINT" (DOWN) (RVS} SAVE 
(SPACE]PILE “:0P=8 
INS=N§ is INPUT" [DOWN] FILE 
NAMER43";INS:1F INS=NS 
REAR ea EE aae 

SION EER 
inva} tlorF APE OR {RVS} 
D{OPF}ISK: £43" 





FP 738 GET AS+IF CaS PR 


nr "B iow: 
HQ. 740 IP-AS<>"D"TI SE ee 


GOTOBSG 











Gs 


GE 


FA 


SA. 


cs 


Pe 


GR 


759 


768. 
778 


788 


798 
808 


810 
828 


830 


840. 
858 


868 


870 
880 


898 


900 


918 


920 


938 


940 


958 
960 


970 


980 


990 


1608 
1819 


1628 


1838. 


1649 IF (AD> 511 AND. AD<40960 


PRINT"D{DOWN)":OPEN15,8 
715, "I6:":B=EA-SA: INS=" 
@:"+INS:IP OP THENS16 
OPEN 1,8,8,INS+",P,W":G. 
OSUB860:IF A THEN226 
AH=INT(SA/256) :AL=SA-(A 
H*256) :PRINT#1, CHRS (AL) 
7CHRS (AH); 

FOR I=8 TO B:PRINT#1,CH 
R$(PEEK(BS+I))7:IF ST T 
HENS2O 

NEXT:CLOSE1 :CLOSE15 :GOT 
0945 


GOSUB1960:PRINT" {DOWN} 
{BLK]ERROR DURING SAVE: 
£43" :GOSUBB6O :GOTO220 
OPEN 1,8,8,INS+",P,R":G 
OSUB86O:TF A THEN220 
GET#1,A$,B$ :AD=ASC (AS+Z 
$)+256*ASC(BS+Z$):IF AD. 
<>5A THEN F=1:GOTO859 
FOR I= TO B:GET#1,A$:P 
OKE BS+I,ASC(AS+Z$) :1F( 
I<>B)AND ST THEN F=2:AD 
=I:I=B 

NEXT: IF ST<>64 THEN F=3. 
CLOSE1 :CLOSE15:0N ABS(F. 
29)+1 GOTO969 978 
INPUT#15)A,A$:1F A THEN, 
CLOSE]: CLOSE15 :GOSUB1 
60:PRINT"{RVSJERROR: "A 
s 

RETURN 

POKE183, PEEK (PA+2) POKE 
187, PEEK(FA+3) :POKE18B,, 
PEEK(FA+4) :1FOP=OTHEN92 


6 

SYS 63466:1F(PEEK(783)A 
ND1) THEN GOSUB1960:PRIN, 
T" {DOWN} {RVS}\ FILE NOT 
{SPACEJFOUND ":GOTO690 
AD=PEEK(829)+256*PEEK(8: 
38) :IF AD<>SA THEN P=): 
GOTO978 
A=PEEK(831)+256* PEEK(83 
2)=1:F=P-2* (A<EA)-3* (A> 
EA) ?AD=A-AD:GOTO939 
A=SA:B=EA+1:GOSUB1019:P 
OKE780,3:SYS_ 63338 
A=BS:B=B8S+(EA~SA)+1:GOS 
UBI19:0N OP GOTO95B:SY 
S 63591 
GOSUB1080:PRINT" {BLU} ** | 
SAVE COMPLETED **";GOT 
0220 

POKE147,0:SYS 63562:1F 
{SPACE }ST>0 THENS70 
GOSUB) 080: PRINT" (BLU) #* 
LOAD COMPLETED **":GOT 
0226 
GOSUB1069.:PRINT" {BLK} 
{RVS}ERROR | DURING LOAD? 
{DOWN} §43":0N\ F_ GOSUB98 
6,998, 1900 :GOTO220 
PRINT" INCORRECT STARTIN 
G ADDRESS. ("7 :GOSUB366; 
PRINT") "2RETURN |) 
PRINT"LOAD ENDED. AT "7 = 
AD=SA+AD:GOSUB360 :PRINT 
D$: RETURN . 
PRINT "TRUNCATED AT. END 
ING ADDRESS": RETURN 
AH=INT(A/256) :AL=A~(AB | 
*256) :POKEL93 ,AL? POKEL 
94, AH 

AH=INT(B/256) :AL=B- (AH. 
*256) :POKE174,AL:POKE1. 
75, AH: RETURN 

IF AD¢SA OR AD>EA\ THEN 
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JOR(AD>49151 AND AD<53 
248) THEN GOSUB1080:F=0 
:RETURN 
GOSUB1968:PRINT"{RVS} 
(SPACE) INVALID ADDRESS 
(DOWN) (BLK) ":F=1:RETU 


HC 1858, 


RN 

POKE SD+5,31:POKE SD+6 
,2@8:POKE SD,248:POKE 
{SPACE }SD+1,4:POKE SD+ 
4,33 

FOR S=1 TO 100:NEXT:GO 
TO1898 

POKE SD+5,8:POKE SD+6, 
240:POKE SD,0:POKE SD+ 
1,98:POKE SD+4,17 

FOR S=1 TO 100:NEXT:PO 
KE SD+4,@:POKE SD,8:PO 
KE SD+1,0:RETURN 


1868 


1078 
1086 


1698 


Program 2: MLX For Commodore 
128 


AE 100 TRAP 960:POKE 4627,128: 
DIM NLS,A(7) 

XP. 110.22=2124=254 :75=255126=2 
56:Z7=127:BS=256*PEEK(4 
627 /:EA=65288 

FB 126 BES=CHRS (7) :RTS=CHRS (13 
) sDL$=CHR$ (20) :SPS=CHRS 
(32) :LES=CHRS (157). 

KE. 130 DEF FNHB(A)=INT(A/256): 
DEF FNLB(A)=A~FNHB(A)*2 
56:DEF FNAD(A)=PEEK(A)+ 
256*PEEK(A+1) 

JB 140 KEY 1,"A":KEY 3,"B":KEY 


aa SCM SKEX 7, “D® 15 
zIP RGR(@)=5. THI 
F150. PRINT" {CLR} "CHRS (142 


HR$(8):COLOR @,15:COLOR 
4,15:COLOR 6,15 
PRINT TAB(12)"(RED} 
{RVS}{2 SPACESJE9 @3 
(2 SPACES} "RTS; TAB(12)" 
{Rvs} {2 SPACES] (OFF) 
{BLU} 128 MEX (RED) 
{RvS}{2 SPACES}"RT$;TAB 
(12)"{Rvs}(13 SPACES} 
{BLU}" 
PRINT" {2 DOWN) 
{3 SPACES} COMPUTE! 'S MA 
CHINE LANGUAGE EDITOR 
{2 DOWN)" 
PRINT" (BLK) STARTING ADD 
RESSE43";:GOSUB 260:1F 
(SPACEJAD THEN SA=AD:EL 
SE 180 
PRINT" (BLK} [2 SPACES} EN 
DING ADDRESSE43";:GOSUB. 
260:TF AD THEN EA™AD:E 
LSE 198 
PRINT" (DOWN) (BLK) CLEAR 
USPACE] WORKSPACE [Y/NJ? 
E4]":GETKEY A$:IF AS<>" 
¥" THEN 220 
PRINT" {DOWN} {BLU} WORKIN 
G..."72BANK @:POR A=BS 
(SPACE}TO BS+(EA-SA)+7: 
POKE A,O:NEXT A:PRINT"D 
ONE" 
PRINT 'TAB(10)" (DOWN) 
{BLK}{RVS] MLX) COMMAND. 
{SPACE}MENU £43 (DOWN)"= 
PRINT TAB(13)"{RVSJE 
{OFF JNTER DATA"RTS;TAB( 
13)"{RVS]D{OFFJISPLAY D 
ATA"RTS$;TAB(13)"(RVSJL 
{OFF}OAD FILE" 
HB 230 PRINT TAB(13)"{RVSJS 


GQ 160 


FE 


178 


DK 


180 


FH 


ME 


200 


QH 210 


220 

















{ORFJAVE FILE*RTS;TAB(1 
3) "{RVS}C{OFFJATALOG DI 
SK"RTS$;TAB(13)"{RVSJQ 
{oFF}UIT{ DOWN} {BLK}" 
AP 248 GBTKEY AS:AciNSTR("EDLS 
CO",A$)20N A GOTO 340.5 
50,648,658, 930, 940:GOSU 
B950:GOTO. 240 
PRINT"STARTING AT"; :GOS 
UB 260:1F(AD<?@)OR(AS=N. 
L$) THEN RETURN: ELSE 250 
AS=NL$ZINPUT AS31F LEN( 
AS)=4 THEN AD=DEC(AS) 
P-AD=0. THEN BEGIN: IF A 
Siow THEN 3008tELSE RE 
RNTBEND. 
MA 280 % AD<SA OR AD>EA THEN 
{SPACE} 300 
PM 298 IF AD>511 AND. AD<65280 
{SPACE]}THEN PRINT BE$;+ 
RETURN 
SQ 300 GOSUB\ 958:PRINT"{RVS} I 
NVALID ADDRESS {Down} 


SX 258 


BG 268 


DD 320 CK=CK*Z2+25* (CK>27)+A 

AH 330 CK=CK+Z5*(CK>Z5) :RETURN 

QD 340 PRINT BES; "(RVS} ENTER 
SPACE}DATA ":GOSUB 250 
IF AS=NL$ THEN 228 

JA 350 BANK :PRINT:F=0:0PEN 3 


13 

BR 360 GOSUB 310:PRINT HEXS(AD 
)+*e";2IF FP THEN PRINT 
(SPACEJLS: PRINT" (UP) 


15, 
on a2 stigetyro 24 STEP 3:B$ 
=SP$:. d=1 TO 2:1F F 


(SPACE THEN BS=MIDS(LS, 
I+d,1) 

PS 389 PRINT"{RVSJ"BS+LFS 7 21F 
{SPACE}I<24 THEN PRINT" 
lorF}"; 

RC 398 GETKEY AS:IF (AS>"/" AN 
D-AS<":") OR(AS>"@" AND 
A$<"G") THEN: 

AC 468 IP AS="+" THEN AS="E":G 


AN 

PRIN 
T BS; d=2sNEXT:1=24:GOT 
© 486 

430 IF AS="{HOME}" THEN PRI 
NT HS:9=2:NEXT:1=24 :NEX 
TiF=8:GOTO 368 

440 Ir) (AS="{RIGHT}") AND F 
THEN PRINT BS+LP$;:GOT 
0 476 

450 IP A$<>LFS AND A$<>DL$ 
{SPACEJOR ((I=8) AND. (I 
=1)) THEN GOSUB 956:GOT. 
0. 398 

460 AS=LPS+SPS+LFS:PRINT BS 
+LES;20=2-J:1P J THEN P 
RINT) LF§;21=1-3 

470 PRINT AS; :NEXT J; PRINT. 
{SPACE}SP$; 

480 NEXT I:PRINT:PRINT"{UP) 
{5 RIGHT)"; 2LS=" 
(27 SPACES)" 

490 FOR I=1 TO 25 STEP 3:GE 
T#3,AS,BS:IF AS=SPS$ THE 
N I=25:NEXT:CLOSE 3:GOT 
0 226 

508 AS=A$+B$:A=DEC(AS) :MID$ 
(L$, I,2)=A$:IF I<25 THE 
N GOSUB 32@:A(1I/3)=A:GE 
T#3,AS 


RD. 


XB 


oP 
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AR 510 


Dx 


XB 
CA 


MC. 


JF 


sQ 


cc 


GA 


FD 


520 


538 
540. 


558 


568 


630 
640 


650 


668 


670 


680 


690 
788 


718 


726 


738 


749. 


750 


T I:rIF A<>CK THEN GO 


iB, 9503 PRINT: PRINT” 
{RVS} ERROR: REENTER LI 
NE “:F=1:GOTO 360 
PRINT BE$:B=BS+AD-SA:FO 
R I=@ TO 7:POKE B+I, A(t 
) :NEXT. I 
Pe@:AD=AD+8:1F AD<SEA x 
HEN 368 
CLOSE 3:PRINT" (DOWN) 
{BLUJ** END OF ENTRY **. 
{BLK} {2 DOWN}":GOTO 650 
PRINT BES; "{CLR} (DOWN) 
{RVS} DISPLAY DATA. ":GO 
SUB 250:1F AS=NL$ THEN 
{SPACE} 220 
BANK 3: PRINT" (DOWN) 
{BLU) PRESS: (RVS]SPACE 
{OFF} TO PAUSE, [(RVS}RE 
TURN{OFF) TO BREAKE43 
{Down} 
PRINT HEX$(AD)#"3"7¢GOS 
UB 310: BeBS+AD-SA 
FOR I=B TO B+7:ASPEEK(T 
) PRINT RIGHTS (HEXS(A), 
2) :SP$;sGOSUB 320:NEXT. 
{SPACEJ1 
PRINT" {RVSJ"; RIGHTS (HEX 
$(CK),2) 
F=1:AD=AD+8:1F AD>EA TH 
EN) PRINT" {BLU} ** END. OF 
DATA **":GOTO 220 
GET AS:IF AS=RT$ THEN. P 
RINT BES:GOTO 220 
IF (AS*SPS$ THEN P=F+1:PR. 
INT. BES; 
ON P GOTO 578,610,570. 
PRINT BES" {DOWN} {RVS}L 
OAD DATA ":0P=1:GOTO 66 





C) 

PRINT. BES" {DOWN} {RVS}.S 
AVE FILE ":OP#0 

F=0 iF SSNL$:INPUT"FILENA 
MEEG3";PS:1F FS=NLS\ THE 
N228 
PRINT" { DOWN) {BLK} [RVS}T 
{OFFJAPE OR [RVS}D{OFF} 
ISK: £43"; 

GETKEY A$:IF A$="T"\ THE 
N 850:ELSE IF AS<>"D" T 
HEN 680 
PRINT"DISK(DOWN}"2IF OP 
THEN 766 

DOPEN#1, (FS+",P") WrIk 
{SPACE]}DS. THEN AS=D§2G0 
TO 749 

BANK §:POKE BS-2,PNLB(S 
A):POKE BS=1, PNHB (SA) :P 
RINT*SAVING "725 :PRINT 
FOR A=BS-2 TO BS+EA-SA? 
PRINT#1,CHRS(PEEK(A)) i 
IF ST THEN AS="DISK WRI 
TE ERROR":GOTO 750 

NEXT ArCLOSE 1:PRINT" 
{BLU)** SAVE COMPLETED 
{SPACE JWITHOUT ERRORS, \ 
*":GOTO. 226 

TF DS#69 THEN BEGIN:CLO 
SE. 1+INPUT"{BLK}REPLACE 
EXISTING PILE [x/NJE43 
“TAS: 1F A§="Y" THEN SCR) 
ATCH(F§):PRINT:GOTO. 700 
3ELSE PRINT" {BLK} "2GOTO 
660: BEND 

CLOSE 1:GOSUB 950:PRINT | 








{BLK} (RVS} ERROR DURIN 


760 


G SAVE: £43":PRINT A$iG 
oTO 228 

DOPEN#1, (FS+",P")2IF DS 
THEN AS=DS$zF=4:CLOSE 
{SPACE}]1:GoTO 790 








PX 778 





“KB 780. 








RQ 798 





ER 809 


Qu 810 
DP 820° 
“EB B30 





KS 850° 


See instr 


" TrBLOAD(F$),59, 
“=SA+PNAD(174)-BS-12P=-2 


G ADDRESS ("7 HEX$ (AD) ;" 


GET#1,A$,BS$:CLOSE 1:AD= 
ASC(AS)+256*ASC(BS) :1F 
{SPACE]ADOSA THEN F=1: 
GOTO 79° 

PRINT"LOADING ";F$:PRIN 
(BS) AD 





*(AD<EA)-3* (AD>EA) 
IF F THEN 800:ELSE PRIN 


“T"{BLUJ** LOAD COMPLETE 


D WITHOUT ERRORS **":GO 
TO. 220 : 
GOSUB 950:PRINT" {BLK} 
{RVS} ERROR DURING LOAD 
£43":0N F GOSUB 819,8 
20,830, 8403;GOTO220 
PRINT" INCORRECT STARTIN, 








PRINT "LOAD ENDED AT "TH 


EX$(AD) :RETURN 
PRINT" TRUNCATED AT ENDI 


NG ADDRESS ("HEXS(EA)") 


"SRETURN, 

PRINT™DISK ERROR ";A$:R 
ETURN 

PRINT"TAPE™ PAD=POINTER( 


Address Cataloger 


uctions in article on page 57 


before typing in. 





refer to 


which a| 
Listings. 


0801:FF 
@809:31 
6811:20 
0819:0A 
@821:BD 
@829:FF 
0831:4B 
@839:E7 
6841:70 
0849:0E 
0851:20 
9859:85 
@861:A9 
0869:39 
0871:20 
8879:20 
0881:FB 
0889:1F 
0891:48 
089921 
O8A1:40 


9901 :A0 
9909:F7 
@911:1C 





BEFORE TYPING ... 
Before typing in programs, please 


“How To Type In 


COMPUTE!’s GAZETTE Programs,” 


pears before the Program 











xX 869 


FG 878 


AB 888. 


P$):BANK 1:A=PEEK(AD):A 
L=PEEK(AD+1) :AH=PEEK (AD. 


+2) 

BANK 15:SYS DEC("PF68") 
»@,1:SYS DEC("FFBA"),1, 
1,8:SYS DEC("FFBD"),A,A 
L,AHiSYS DEC("PF90"),12 
8:IF OP THEN 890 

PRINT sA=SA:B=EA+1:GOSUB 
920:SYS DEC("E919"),3: 
PRINT"SAVING ";FS 
A=BS:B=BS+(EA-SA)+1:GOS 
UB 920:SYS DEC("EA18"): 
PRINT" (DOWN) (BLU}** TAP 


E SAVE COMPLETED **"GO 


cP 898 


GQ 988 


JD 910 


8919:E9 
9921:13 
@929:3C 
9931:D1 
8939:20 
0941:F0 
0949:A0 
@951:A2 
9959:20 
0961:68 
8969:26 
9971:20 
6979 :0A 
0981:A8 
9989:18 
9991:BD 
0999:A9 
@9A1:A8 
8909254 
09B1:4E 
0989: 28 
@9C1 :52 
99C9:0D 
@9D1:85 
9909 C4 
O9EL:A4 
O9E9:85 
99F1:0C 
O9F9:FO 
@A01:3A 
GA09:20 
@A11:A2 
8A19:20 
@A21:20 
0A29:40 
@A31 02 
@A39:FF 
@A41:01 
@A49:40 
OA51:1F 
@A59:A8 
OAG1:0A 
@A69:FF 
@A71:FF 
BA79:FF 
OAB1:FF 
@A89:85 
@A91:BA 
@A99:F9 
@AAL:4C 
OAAI: 28 
9AB1:20 
BAB9:0A 


TO 220 

SYS DEC("E99A"):PRINT:I 
F PEEK(2816)=5 ‘THEN GOS 
UB 950:PRINT" (DOWN) 
{BLK} (RVS} FILE NOT FOU 
ND “:GOTO 220 
PRINT"LOADING ... {DOWN} 
":AD=FNAD(2817) :IF AD<> 
SA THEN F=1:GOTO 800:EL 
SE AD=PNAD(2819)-11P=-2 
*(AD<EA)-3*(AD>EA) 
ASBS:B=BS+(EA-SA)+1:GOS 


99 C6 62 CB CO BC FO D1 





XB 


ce 





@AC1:CD BD 20 46 GA 26 46 BA FB 
BACI:A9 36 B5 O1 66 24 30 3A 2F 
@AD1:A6 AG AG 2A A2 18 AG OE 1F 
@AD9:18 26 FO FF A9 EA AB OA 64 
OAE1:20 FB OA 20 E4 FF FO FB 4D 
@AE9:60 12 1C 56 52 45 53 53 DC 
@AF1:26 41 4E 59 26 4B 45 59 D7 
@AF9:92 88 85 65 84 B6 AD FF DS 
@BO1:CB Bl 65 FO 86 20 46 14 DC 
@B99:4C 81 OB 6G 20 C4 OB EO F7 
9B11:01 BO 61 GO 86 BD AD BO B7 
@B19:85 8B AA EE 20 D® AD 76 21 
@B21:85 62 AI 17 85 3 AS 82 AG 
©B29:85 O05 18 69 CB B85 B2 AS E2 
0B31:03 85 06 69 BO 85 03 AB 3E 
OB39:FF C8 CO 25 FO 1F Bl 02 55 
@B41:D1 65 FO F5 BO 17 AB C7 ED 
9B49:B1 62 85 F7 Bl @5 91 62 AF 
@B51:A5 F7 91 O5 88 CO FF DO D2 
@B59:EF A9 G1 85 8B E8 E4 8D Al 
B61:D8 C4 C6 BD FO 04 AS BB 31 
@B69:D8 AC 68 AG FB EG ES FO A9 
9B71:1A 26 68 16 AS O2 85 Cl AB 
9B79:A5 G3 85 C2 EB 26 6B 10 98 
@BB1:A5 62 85 BD A5 @3 B85 BE 7A 
9B89:20 66 13 26 92 OB 4C 81 BB 
@B91:16 A2 ES 4C CA OD 20 C4 69 
9B99:08 E@ E5 FO 25 AG FB EO DS 
OBA1:E5 FO 1F 20 68 16 A5 G2 5D 
@BA9:85 BD AS 03 85 BE E8 20 EF 
@BB1:60 16 AS 62 85 Cl A5 O3 52 
@BB9:85 C2 20 AG 13 AG FB 4C 29 
@BC1:D1 OF 60 A2 FF EB EO 
@BC9:FO 19 20 60 18 AG CB BB C5 
@BD1:CO FF FO Fl Bl 62 C9 AG 4F 
OBD9:FO F5 C9 AD FO Fl 86 F7 4E 
OBE1:4C C6 OB AG F7 60 AO OO 36 
@BE9:85 3A A2 4C AG 12 AD 64 OF 
@BF1:26 Cl 12 A5 8B C9 B3 DO 7F 
OBF9:81 60 85 28 A2 93 AB 12 92 
@CO1:A9 G3 20 Cl 12 AS 8B FO FD 
6C09:1B C9 G1 FO O1 60 20 C4 DE 
6C11:0B EB 86 BF A2 BO 20 49 51 
@C19:6C 26 El FF FO 65 EB E4 CD 
@C21:8F D@ F3 68 20 4D 08 EO EO 
@C29:E6 FO 1C 26 81 16 AG FB OC 
9C31:28 49 oc 
9C39:FO @D 26 81 10 AG FB 26 SC 
@C41:49 GC 26 El FF DO EC 6B AG 
6C49:B8A 48 20 68 18 AD BO 85 GF 
@C51:8D AS 28 GA AA BD 3A 14 14 
@C59:8D 5B OD BD 3B 14 8D 5C 2E 
@C61:0D AY O1 AB OB A2 O4 26 47 
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930 CATALOG PRINT" (DOWN). 


958 SOUND 1,580, 10: RETURN 
960 IF ER=14 AND EL=260 THE . 


978 IF ER=14 AND. EL=508 THE 
980 IF ER=4 AND EL=788 THEN 
998 IF ER=30 THEN RESUME:EL~ 


UB 920:S¥S DEC("E9EB"):— 
IF ST? THEN 800:ELSE 7 
90 





920 POKE193,PNLB(A) :POKE194_ 


+ FNHB(A):POKE 9174, FNLB( _ 
BURECKE 175, PWHB (B) «RET 





{BLU}** PRESS ANY KEY Fo 
OR MENU **":GETKEY AS?G. 
TO 226 \ S 


949. PRINT. BES" {avs} urn. S 


£43";RTS;"ARE YOU SURE. 
(SPACE}LY/N12":GETKEY A 
S:IP A$<>"Y" THEN 2203E_ 
LSE ERENEATCORICSEARR \ 
5:END 











N RESUME 300 
N RESUME NEXT 
F=4:AS=DS$:RESUME 800 





SE PRINT ERR$(ER) 7" 
OR IN LINE"; EU. 








8C69:BA FF 20 CO FF A2 G1 20 9B | OFG9:11 85 FC BD 97 11 85 FD 96 | 11B1:44 
9C71:C9 FF AS 28 C9 02 FO 16 F3 | GF11:60 68 68 AS 04 DO G3 20 GA | 11B9:41 
QC79:A5 3A C9 38 90 10 49 FF 87 | OF19:63 OD AI OO 85 FE 60 AQ F3 | 11C1:0D 
9C81:18 69 43 AA 20 43 OA CA FF | OF21:FF 4C DA OF AQ O1 4C DA 63 | 11C9:A3 
9C89:D FA A9 61 85 3A A2 FF 68 | OF29:F 20 63 OD AS FB CO ES AA | 11D1:A3 
@C91:E8 20 5A OD C9 FD DO G3 2p | OF31:FO 43 E6 FB 4C 70 OF 6O D7 | 11D9:6D 
9c99:4c 22 6D C9 FC DB G9 A B5 | BF39:20 63 OD AS FB C9 DC 90 BD | 11E1:41 
@CA1:32 38 ES 8D 85 F7 DO OA 2E | BF41:04 AY ES DO O5 AS FB 18 64 | 11E9:56 
@CA9:C9 EF DO GF EB 26 5A OD 3B | OF49:69 OA 85 FB 4C 70 OF 20 71 | 11F1:00 
@CB1:85 F7 20 46 OA C6 F7 DO 1F | OF51:63 OD AS FB C9 OA BO 04 B4 | 11F9:4F 
@CB9:F9 FO DS C9 FE Ds 11 EB AB | BF59:A9 OD FG O5 AS FB 36 B9 32 | 1201+45 
@Cc1:28 5A GD 85 F7 FO CO 20 Bl | BFG1:HA 85 FB 4C 70 OF 26 63 8D | 1299:00 
9cc9:43 GA C6 F7 DO F9 FO CO 6F | GF69:OD AS FB FO OB C6 FB 26 79 | 1211:20 
@Cb1:C9 BA 96 G6 20 40 14 4c 3A | OF71:81 10 20 FA OD 60 20 20 52 | 1219:41 
9CD9:91 BC AB B9 83 GE 48 B9 OD | BF79:OF AY AG 91 FC 6O AD GO G1 | 1221349 
QCE1:84 BE 85 F7 68 AB 20 40 56 | OFB1:CB Bl FC 10 O7 8B 91 FC BB | 1229:49 
QCE9:0D AS BD 18 65 BC 85 BD 1B | GFBI:CB 4c 81 OF BB AD AG 91 FD | 1231:FE 
QCF1:E6 BC C8 C4 BC DO GA EB AA | OF91:FC 60 AD FF CB Bl FC 30 91 | 1239121 
@CF9:26 5A OD 16 G1 CA 4c 91 BB | OF9I9:FB 88 BB 30 OB Bl FC CB BS | 1241:05 
@D01:9C Bl G2 C9 AD FG EB C9 3D | OFAL:91 FC 4C 9A GF AO 00 FO EG | 1249106 
@D09:A9 FO E7 88 CB C4 BC FO 98 | GFAS:E4 AG FF 4C AF GF BA 48 BF | 1251:0D 
@D11:ED Bl 62 29 3F C9 1B BO 69 | BFB1:0A AA BD 96 11 85 O5 BD O7 | 1259320 
9b19:62 69 40 26 40 14 4c OD 78 | GFB9:97 11 85 66 AG FF CB Bl 41 | 1261:54 
@D21:0D AS 28 C9 82 FO GD AG 5B | GFC1:05 10 OA C9 AD FO F7 AD OF | 1269:48 
@D29:32 Ad C3 26 40 14 8B DO 75 | OFCI:AG 91 O5 DB Fl GB AA 60 31 | 1271:54 
@D31:F8 20 43 GA AD G1 26 C3 2E | GFD1:A2 09 20 AF GF CA 16 FA 41 | 1279245 
@D39:FF 20 CC FF 68 AA 60 98 3C | BFD9:60 85 F8 85 F9 30 B4 AD 43 | 1281:4C 
@D41:48 CB 84 BC 88 E6 F7 CB AI | OFE1:00 85 FO AD GO BS FE AS F4 | 1289:4E 
@D491:C4 F7 DO 03 68 AB 6G Bl 66 | GFE9:FC 48 A5 FD 48 AS FB 18 10 | 1291:1¢ 
@b51:02 C9 AG FO F2 84 BC DO 95 | BFF1:65 FC 85 FC A5 FD 65 F9 6C | 1299:0D 
@DS9:EE BD FF FF 60 AO 37 85 F7 | GFF9:85 FD Bl FC 16 16 C9 AD 62 | 12A1:43 
@D61:01 90 AG FB 20 68 16 A2 D5 | 1001:D0 15 AS FF C9 G7 DO OF 9E | 12A9:4C 
9D69:00 BD 96 11 85 95 BD 97 2A | 1909:20 E4 OF 4c 18 10 68 85 70 | 12pl:4E 
@D71:11 85 G6 AB GO Bl OS 10 21 | 1O11:FD 6B BS FC 4C 1A 10 68 1E | j2p9:1¢ 
9D79:05 91 62 C8 10 F7 98 18 FO | 1019:68 AO O1 85 FE 66 AG FB 13 | 12C1:85 
9D81:65 62 85 G2 AS 63 69 a0 AB | 1021:4C 49 BC 91 11 9D 1M BD 9A | 12c9:08 
9D89:85 63 EB EB EO 14 DB D9 AS | 1029:14 94 SF 13 93 G3 DB DD D3 | 12p1:c8 
@D91:68 AI BE 2 40 14 A9 8 c7 | 1031:06 04 99 10 O1 AG DC EC CO | 12D9:14 
9D99:20 40 14 A9 OO 85 FE 85 BA | 1039:0E F7 GE 20 OF 25 OF F7 45 | 12E1:FO 
1041:08 77 OF 93 OF 7F OF AA AO | 12E9:A2 
1049:0F D1 GF 12 OF 2A OF 67 OF | 12F1:CA 
BDB1:A9 BD 8D 15 93 58 A 70 24 | 1851:0F 25 GE 6C OB 97 OB 1F BG | 12F9:20 
@DB9.85 62 A9 17 85 03 A2 ES 21 | 1859:10 81 10 39 OF 50 OF BA D9 | 1301:86 
PE Et a ee deed ae 1961148 A 76 85 92 a9 17 85 EB | 13091c9 
@Dc9:60 28 66 10 1069103 EO 68 FO 10 AS 02 18 85 | 1311:8B 
app nO C7 D9 AO 41 | 1971169 CB 85 02 AS B3 69 OO 55 ‘ 
1:91 62 88 CO FF DO F9 AI 33 1319:D8 
@DD9:AD AB B1 91 62 AD BS 91 6B aes 0 Oh De are 68 AA 60 62 | 1321:13 
ODE1:02 66 AS FE FO 10 C6 FA d i 10 A2 OB BD C6 | 1329:04 
ODEO DG 6G Ad 1d GF Ph so oo se | 1089296 11 85 05 BD 97 11 @5 2E | 1331:4c 
ODF1:B: 1091:06 Ad 89 Bl O5 10 67 Bl 20 
'1:Bl FC 49 89 91 FC 4C 31 9F 13393C5 
ODF9:EA A9 GO 85 FE 85 FF A8 63 SEAT a 2 a 18 F5 98 18 ED | 1341:c6 
@£61:B1 FC 69 86 91 FC 20 OF 2E fell 28. AS 83 69 OO D1 | 1349:12 
QE09:GE AD O1 85 FE 60 AD 96 7a | 1@A9:85 @3 EB EB EO 14 De D7 C9 | 1351:A0 
£11.11 88 FC AD 97 11 BS Fp 9p | LOBLEA9 13 26 40 14 AG FB EB SF | 1359:49 
GE19.60 Ad 34 05 BF AD G2 Gs vg | 1OBIHAD GD 4C BA OA EG O2 DO Ad | 1361:6D 
GE2LtOs 4¢ 68. OD AG ob Le 20 ce | 12ClaB2 EC 03°60 20 OF OF 26 7c | 1969;z9 
9£29:60 10 16C9:93 @8 AI OB BD 20 DO BD B7 
AO 69 86 62 BO 83 D2 1371:BE 
@E31:@E 65 BE AA B9 B4 BE B85 B3 eS Be a2 ee BD OE 11 85 DB | 1379313 
oe : BD OE 11 85 03 AO 13 | 1381:F 
BEg9 108 G4 Gl EG EG GF Fr? 36 76 | 19B1:88 £8 AS G2 05 03 FB 24 4B iseores 
i 19E9:BD GE 11 FO 08 29 BF 91 93 
@E49:8D A4 BE A6 8D CB C4 BF 3A 1391:BF 
Beer ee te Bh oe oo Se Ga Op wn | 18FL:62 £8 cB 10 F3 EB ca AD FO | 1399:13 
BE59:P4 84 BE CB EB Bd oF FO Sa | LEOIBE 11 86 FG AA FO 08 AQ 98 | 13ALIA5 
@E61:15 BD ; cI AG D’ 13A9:E9 
ittenrpeey ee ee a re} He Be 1109:P8 ES DB CB 6 50 04 4c 21 | 13B1+01 
Bee oe pale, bo EOL ED Aes 62)/05)| alir42 53° $4)90148141 4D 45)8C | 19B9013 
BB 79 500) 10,83 A6) 62/86 240136) | 212e ek ee eee tee ee tei og | agentes 
OEBL i : 2 13€9:D8 
eeetee ae ee Ag 2h ah AF 62 42 | 112913A a0 OF FO 04 53 So 4F BG | 13D1:0D 
BEG} #71 7) 80 AB C7 Ao G2" 85 ES | 1191155 53°45 9h) 20/29) 28 29 62 | iaD9.eF 
eae oe Eh ob ae Ed Fr FO 6B | 1139100 OF 40 @5 41 44 44 52 6D | 1381113 
B¥ALs07) 291/71, A2| 88,00) 2411085) ||'17 49 kg SashSddSoNGRS abba" 2B! aa ||| aseiker 
: A 20 20 20 32 | 13F1:60 
reas rs Fe I ma De Ee 23 ne 1151100 12 £0 05 53 54 41 54 27 | 13F91BB 
BEBO #01". 201 DAV OPN 40198) BE/AS/(23 | iatea aa: Go. agliggeool on! aocao\ Sail iaaeoteD 
: A 8 20 20 92 | 1409:0D 
peered ee H Es oe Be co ae ee 1169:00 OB 88 86 50 48 4F 4E 4F | 1411:06 
OEC9:00 AB 5 FE Bl FC 09 89 C4 | 1171245 3A 20 20 20 Ad AD AO 30 | 1419107 
GED9:8D E3 GE BD 39 10 AD E4 5D | ties iAp Ao Oo nO OG ae oe oe on | 4435338 
: 4 4B ' 
QEE1:0E 20 FF FF A9 61 85 FE 68 | 1189:52 41 3A 20 26 90 1£ 69 AB | 1431:04 
GEE9:4C 95 GE C6 FF 10 64 AD B1 | 1191:67 86 1E BB BB SC B4 AC 21 | 1439:FD 
GEF1:09 85 FF 4c 03 OF E6 FF DA | 1199104 FC 64 49 85 99 O5 E9 94 | 1441:A5 
GEF9:A5 FF C9 GA 99 04 AD BO AA | 11A1:05 39 G6 89 G6 D9 6 D1 92 | 1449:0D 
OFO1:85 FF AS FF OA AA BD 96 A3 | 11A9:67 93 BD BD GO OB IF 41 52 | 1451:D2 
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° 1578:A9 08 Bl 3B 8D BB G3 CB 18 | C118:86 AF A2 94 AD GO C4 FO 47 
TurboDisk 128 1580:B1 3B 8D 61 03 26 CD O5 4D | C120:15 20 65 Cl 26 7D Cl AD 27 
Geeks PE ane ee 1588:20 96 O5 AD 0B 63 DO F5 87 | C128:68 C4 36 32 FO 96 20 63 49 
ee instructions in article on page 68| 1599:a9 3A 8D @7 1C 66 AD 6B E3 | C136:Cl 18 96 FO A2 G2 AB BO 1A 
before typing in. 1598:B9 68 03 85 85 AQ 62 8D BC | C138:BD 69 C4 91 AE CB EB EC A3 

15A9:68 18 AD 68 18 29 64 FO E4 | C146:61 C4 90 F4 BD 68 C4 91 DF 
1300:4C 1B 13 A9 6C BD 30 G3 BD | 15A8:F9 AI GO BD OO 18 A2 B4 BC | C148:AE CB 26 78 Cl 18 48 AD 89 
1308:A9 F2 8D 31 83 AO OO BI DB | 15BG:A9 GO B6 85 2A GA OG 85 D3 | C158:1B BD 11 DB 6B AG AE Ad D3 
1310:29 13 FO 06 26 @C CO CB 89 | 15B8:2A GA BD BO 18 CA DO FO AA | C158:AF 58 68 AD B4 2C AD BB 94 
1318:D8 F5 68 AO SC BD 38 O3 47 | 15CO:48 68 48 68 AD BB BD BO 21 | C160:38 BO EB A2 62 AD OO BD 24 
1320:A9 13 8D 31 63 AD 1A DB 44 | 15C8:18 CB DB CC 6G AD B3 B5 4D | C168:00 C4 91 AE CB EB DO F7 BD 
1328:E6 OD 43 31 32 38 20 54 87 | 15D0:85 AC 81 93 84 87 AD OB 55 | C176:18 98 65 AE 85 AE AS AF OF 
1336:55 52 42 4F 44 49 53 4B 6c | 15D8:3 C5 06 GB 85 G6 28 FO BC | C178:69 OO 85 AF 60 AG OB AD BF 
1338:20 44 49 53 41 42 4C 45 CE | 15E0:10 AS BO 85 GO 58 24 G9 95 | C184:08 DD 36 FB AS 17 BD B68 96 
1340:44 GD 68 OD 43 31 32 38 18 | 15E8:30 FC 78 AS 68 C9 G1 DO CD | C18B:DD AD BB DD 16 FB AQ G7 OF 
1348:20 54 55 52 42 4F 44 49 84 | 15F0:54 AI EE BD OC 1C AY G6 90 | C196:8D GO DD A2 64 CA EA DO B2 
1350:53 4B 20 45 4E 41 42 4c 93 | 15F8:85 32 A9 O8 85 33 85 30 DB | C198:FC A2 84 AD GO DD BA OB 32 
1358:45 44 OD 00 85 93 AS 93 2D} 1600:A9 O3 B5 31 20 SC O6 50 54 | CLAD:0A 26 95 28 26 95 CA DO DS 
1360:F0 05 AS 93 4C GC F2 A2 CA | 1668:FE BB AD O1 1C 99 OO O3 F1 | CLAS:F2 AS 95 49 FF 99 66 C4 Bl 
1368:10 AD AD 9D CO 16 CA 10 F2| 1616:CB DB F4 AG BA 5@ FE BB 4B | C1BO:CB DB CC 68 EA EA EA EA 30 
1370:FA AG 06 20 AE F7 C9 24 4B | 1618:AD G1 1C 99 G0 61 CB DB DE | C1BS:EA EA EA EA EA EA EA EA 3C 
1378:F® EB AD 30 DO 85 FA AO 46 | 1620:F4 26 EO FB AS 38 C5 47 5B | C1CO:EA EA EA EA EA EA EA EA 44 
1380:0B 8D 11 DO AD FD BD 30 4F | 1628:FO @4 AQ 22 DO 11 20 E9 1A | C1C8:EA EA EA EA EA EA EA EA 4C 
1388:D0 AD 01 20 AE F7 C9 3A 84 | 1630:F5 C5 3A FO B4 AY 23 DO FC | C1DO:EA EA EA EA EA EA EA EA 54 
1396:F0 04 AG 6 FO O1 CB A2 04 | 1638:66 AI EC BD BC 1C 60 C6 AG | C1DB:EA EA EA EA EA EA EA EA 5C 
1398:FF E8 20 AE F7 9D CO 16 BS | 1646:86 DO AE FO O3 18 69 18 2c | CLE@:EA EA EA EA EA EA EA EA 64 
13A0:C8 C4 B7 90 F4 20 BE 14 BS | 1648:85 44 A9 FF 8D 60 @3 20 16 | CLE8:EA EA EA EA EA EA EA EA 6C 
13A8:A5 BA 20 Bl FF A9 GF 20 15 | 1650:96 @5 A9 3A BD B7 1C AS 48 | C1FO:EA EA EA EA EA EA EA EA 74 
13B0:93 FF A9 55 26 AB FF AQ 78 | 1658:44 4c CB Cl 20 62 06 4c D1 | CLF8:EA EA EA EA EA EA EA EA 7C 
13n8143 20 A8 Fe 20 AE Fe 78 Di | Leeason as ns iz as Le As 13 te | C298:28 43 OF 78 AP 25 8p 82 8 
13€8:28 4D 14 2C 68 BC 30 SD 7D | 1668:85 17 A5 86 85 18 AS -O7 11 €210:8C 61 83 26 CD 5 Ad 83 57 
13CB:A4 C3 AG C4 AS BO FO 06 4F | 1676:85 19 A9 GO 45 16 45 17 FE | C218:8C G2 03 29 cD OS AB 03 57 
13DB:AC 02 GC AE 03 OC B4 AE 3A | 1678:45 18 45 19 85 1A 20 34 90 | C7>R:Re Be RP OO Oe oe OO a2 et 
13D8:86 AF A2 04 AD 00 OC FO 39 | 16ag:F9 AZ 5A 20 9E 06 50 FE 4c | C220:A0 08 Bi 38 28 BE CO G2 38 
13E0:15 20 2F 14 26 4D 14 AD CC | 16sa:B8 AD 01 1c D9 24 0 DO BE | CF28:08 22 CA C8 CB BO Nt Oe OB 
13E8:00 OC 30 3C FO G6 20 2D EB | 1699:06 CB CO OB DO FO 60 CA GO | COIAITY 2h TA Oe C8 OF OO Oo SE 
13F0114 4C £4 13 A2 62 86 FB 28 | 1698:D0 E9 AS 20 DO Al AS DO 10 | C>IB:DE SB BOO) oe Oe oe 
13F8:A0 00 BD 09 OC 20 BF F7 7F | 16AG:8D 5 18 AY 21 2C OS 18 4E : EPEC AB ASSES ED Ce 
1400:CB E6 FB A6 FB EC 01 OC D1 | 16a8:10 9E 2c GB 1c 30 F6 AD 47 | C248:08 FO 07 BO GE 05 85 3n 38 
1408:90 FO BD 9 Oc 20 BF F7 C4 | 16B0:01 1C BB AB OO 6O FF FF 7 | C250:D0 CE AD @ Bene ac 
1410:C8 20 40 14 18 AG FA 8E CD | 16B6:FF FF FF FF FF FF FF FF E4 | C258:01 03 4¢ 13 05 AS FF BD 36 
1418:30 DO A2 1B BE 11 DO AG 93 | 16CH:AB AB AD AD AD AD AD AO EC | C260:00 03 28 26 05 AS AA GD EM 
1420:AE A4 AF 58 66 A9 G4 2C 22 | 16ca:AG AG AD AD AG AG AG AG F4 | C268:07 lc 58 DUeatae Ra 
1428:A9 66 38 BO EB A2 G2 86 93 C279:42) 62,82 /A2 C25E2< 26) 3B 
U0 ep | ASaoe A SDy eR geC 120 SPER ; €280:51 98 8D B1 03 20 CD OS AB 
4aeie7 ce x6 re as vo oo F2 = | TurboDisk 64 208120 36 65 AD 68 69 be £8 £2 
ageae 66 85 AF 66 AQ Fc Bp g2 | See instructions in article on page 64 gage ae an So ey ae ee pe ee 33 
1450:30 DO AD BO AD BB DD 30 32 | before typing in. G2n6188'18 -AD’ag 18200 ed" ra ao 
1aeo:Dp 10 Fa Ad 87 8p aD bp zi | CO0G:18 90 18 AD AS Op 30 03 16 | C2AR:ED AD GD BD G0 18 A2 O4 LB 
1468:A2 64 CA EA D@ FC A2 64 AE | COG8:A9 F4 BD 31 93 AO OO BO B4 | C2BO:A' He HS es an on 08 52k 
1470:AD 86 DD BA GB BA 26 95 16 | CB1G:29 CO FO G6 20 16 E7 CB C6 eerie eatdctce moRGoRoptechye 
1478:28 26 95 CA D@ F2 AS 95 D@ | CO18:DB F5 60 AD 54 BD 30 O3 62 eee es icehenlen eet cian oe 
1480:49 FF 99 00 ac cB DB cc 72 | C820:A9 CO BD 31 3 AB 15 DB o1 | C2CB:1 87 3 CS 86 OB 53 
1488:A9 FD 8D 30 DO 60 A9 19 25 | CO2B:EG OD 54 55 52 42 AF 44 BE Cee eslee tani cea net conesiea 

5 FB 85 FD D5 : 
1498in9 15 85 Fe Ad os as me ce | co38+42 4c 45 44 ap av ap sé ai | CzE0v09 38 24 98 30 FC Ze AS oD 
9 6F 26 OF | CO40:55 52 42 4F 44 

14nBi03 FP AS FD Ad Fe Bp FO Sc | CO4G:20 41 43 54 49 56 41 54 52 | C2FO:OC 1C AD BG 85 32 AD GO G1 
14B0:14 8C Fl 14 AG OO BO ED EB | CO50:45 44 OD OB 85 93 AS 93 Bd 5 33 85 30 AD G3 85 31 
14B8:14 20 AB FF C8 CO 06 DG 2E | CB58:DB 1E AD OO Bl BB C9 24 12 6 52 06 50 FE BB AD G1 29 
14CO:F5 Ad OO Bl FB 20 AB FF DB | CO60:FO 16 A2 10 AD AB 9D AC EC C99 88 03 CB DO F4 AD 48 
14C8:C8 CO 26 90 F6 AS FB 69 42 | CO68:C3 CA 10 FA Bl BB 99 AC BC A 50 FE 38 AD @1 1C 99 B7 
14D8:1F 85 PB AS FC 69 08 85 D6 | CO70:C3 CB C4 B7 90 F6 BO OB EG | C318:00 O1 CB DO F4 20 EO FB EB 
14D8:FC AS FD 69 20 85 FD A5 P7 | CO78:A5 93 4C AS F4 4D 2D 57 24 | C320:A5 38 C5 47 FO 04 AD 22 C2 
14E0:FE 69 00 85 FE 20 AE FF 11 | C080:00 00 20 AD 10 85 FF AY EG | C328:D8 14 20 EY F5 C5 3A FO EB 
14E8:C6 FF DO B4 60 4D 2D 57 C3 | C@88:80 85 FB A9 C2 B5 FC AI 55 | C330:64 AD 23 DO 09 AD EC BD EB 
14F0:68 60 20 FF FF FF FF FF 1D | Cc@90:00 85 FD A9 @5 85 FE AS AF | C338:0C 1C 68 18 69 18 85 44 55 
14F8:FF FF FF FF FF FF FF FF 21 | C098:BA 20 Bl FF A9 6F 20 93 94 | C348:A9 FF 8D 68 63 26 96 O5 19 
1500:26 42 DO 78 A9 15 8D 7 30 | COAD:FF AS FD A4 FE 8D 80 CO 85 | C348:A9 3A BD 87 1C AS 44 4c AL 
1588:1C A9 12 A® G1 8D BB O3 38 | cgAs:8C 81 CB AD BB BY 7D CB 95 | C350:CB Cl 20 5B BE 4C 94 BE C6 
1510:8C @1 03 20 CD 5 A9 O3 FB | coBd:20 AB FF CB CO G6 DO FS AE | C358:A5 12 85 16 AS 13 85 17 E4 
1518:85 3C A2 00 86 4B FO 2B D6 | COBB:Ad OO B1 FB 20 AB FF CB EC | C360:A5 66 85 18 AS 67 85 19 DB 
1520:A0 00 Bl 3B 29 BF C9 82 E2 | COCd:CO 20 90 F6 AS FB 69 1F 3B | C36BrA9 BO 45 16 45 17 45 18 F7 
1528:D8 19 CB CB CB BI BD G6 55 | CocB:85 FB AS FC 69 OO 85 FC E3 | C376:45 19 85 1A 20 34 FO A2 OB 
1530:C9 2A FO 42 C9 3F FO 84 3D | CBDO:A5 FD 69 20 85 FD AS FE 42 | C378:5A 26 94 66 5@ FE BB AD C5 
1538:D1 3B DO 07 CB CO 12 FO G3 | CODB:69 OB 85 FE 26 AE FF C6 32 | C38B:81 1C D9 24 BB DO 86 CB 25 
1540:35 DO EA E6 4B AG 4B EO 71 | COEG:FF DO B4 AS BA 20 Bl FF 41 | C388:CB OB DB FZ 6B CA DB ED 55 
1548:08 FO 07 BD GE OS 85 3B 3D | COES:A9 6F 20 93 FF A9 55 26 C9 | C39B:A9 26 DB AA AI DO BD BS 6A 
1550:D0 CE AD 99 3 FG G6 AC EG | COFG:AB8 FF AQ 43 20 AB FF 20 F3 | C398:18 AO 21 2C BS 18 16 9E C4 
1558:01 93 4C 13 95 A9 FF 8D DA | COFr8:AE FF 78 AQ OB 8D 11 DO FC | C3AG:2C BB 1C 36 F6 AD G1 1C 51 
1560:00 03 26 96 G5 AD 3A BD 89 | C18B:20 7D Cl 2C BB C4 36 53 B4 | C3A8:BB AD BO 6B AB AD AD AD 24 
1568:07 1C 58 4c 45 D9 G2 22 A4 | C1GB:A4 C3 AG C4 AS BO FO G6 EB | C3BO:AG AD AD AD AG AG AD AD 38 
1576:42 62 82 A2 C2 E2 E6 3B 79 | Cl1G:AC 62 C4 AE 03 C4 84 AE DO | C3BB1Ad AB AD AG BO BB BO OO DE 
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Article 


Pirate’s Cove 


on page 55. 





Before 


which 





BEFORE TYPING .. . 
typing in programs, please 


refer to “How To Type In 
COMPUTE!’s GAZETTE Programs,” 


appears before the Program 


Listings. 





KX 10 


DP 26 
pe 
cx 
EB 


40 
50 


XE 
AM 


XR 


QB 90 


KQ 100 
110 


126 
130 


140 
158 
160 
170 
1808 


198 
2008 


210 
220 
230 
2408 
250 
2608 
270 
280 


290 
308 


310 
320 
330 
340 
358 
368 
370 


388 
398 
400 





X=RND(-TI) :S=54272:V=532 


48 

DIM 1(25),R$(25),R1$(25) 
+1$(8) 

DIM Q$(2,8),Q1$(2,25) 
DIM A$(2,8),A1$(2,25) 
DIM D(125),LO(25),LC(25) 
1L(25) 

POKES 3281, :POKE53280,0: 
PRINT"({CLR}" 
FORI=61024 : POKES+1, 6 :NEX 


hy 

PRINT" (5 DOWN}"TAB(14)" 
R83PIRATE COVE":GOSUB147 
:GOSUB1478 

PRINT"({9 DOWN}(7 RIGHTJA 
MINI-ADVENTURE FOR KIDS 


PRINTTAB(13)"B79 
{3 DOWN}CPLEASE WAIT)" 
FORI=12288T012607 : READA 
tPOKEI, A:NEXT 
POKE2046,193 
FORI=2041T02043 :POKEI,1 
97:NEXT 
FORI=V+40TOV+42 : POKEI , 2 
:NEXT 
POKEV+39, 10: POKEV+37, 7: 
POKEV+38,5 
POKEV+29, 15 : POKEV+23,1 
POKEV+28, 1 :POKEV+27,14 
POKEV+16,1:POKEV,0:POKE 
V+1, 75 
X=61:Y=81:POKEV+21,1 
POKEV+2 ,X: POKEV+4 ,X+48: 
POKEV+6 , X+96 
FORI=12608T012608+23 : PO 
KEI, 255:NEXT 
FORI=12608+24T012608+63 
:POKEI , 6 :NEXT 
FORI=1T016 :READR$ (I) :NE 
xT 
FORI=1T08: peapas (1,1):R 
EADAS$ (1,1 
FORI=1TO8: READOS (2,1):R 
EADAS$ (2,1) :NEXT 
FORI=1T0160:READD(I) :NE 
xT 
FORI=1T025 :READLO(I) :NE 
xT 
FORI=117025:R$(I)="HIGH 
SEAS":NEXT 
FORI=1T010:LC(I)=1:NEXT 
FORI=11T025 :LC(I)=2:NEX 
T 
F1=@ :F2=0:Q=1 
FORI=1T08:1$(I)="":NEXT 
FORI=1T025:T(I)=@:NEXT 
FORI=1T025 
RN=INT(RND(1)*25)+1 
IPT (RN)=1THEN359 
=RS(I):L 








Z=1:FORI=1T025 
IFR1$(I)="TREASURE ISLA 
ND"THEN489 
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416 IPR1$(I)="SEA MONSTER'S 
LAIR"THEN489 
IFR1$(I)="HIGH SEAS"THE 
N48 

Q1$(1,1)=Q$(1,2) 
Q1$(2,1)=Q$(2,2) 
A1$(1,1)=A$(1,2) 
A1$(2,1)=A$(2,2) 

Z=Z+1 

NEXT 
FORI=1T025:IFR1$(I)="PI 
RATE COVE"THENR=I:RR=R 
NEXT 

TM=R: IFR1$(R)="TREASURE 
ISLAND" THEN1040 

PRINT" (CLR}E83CURRENT L 
OCATION: (GRN}"; 

530 GOSUB1478 

CA 540 PRINTR1$(R) "£83" 

KQ 556 PRINT" (HOME}(2 DOWN)" 
SG 560 IFR1$(R)="HIGH SEAS“THE 
N968 

IFR1$(R)="SEA MONSTER'S 
LAIR"THEN1270 
POKE2040, 193: POKEV+39,1 
0 :POKEV+37,7:POKEV+38,5 
Y=B81:K=1:D=5 
POKEV+3 , ¥: POKEV+5, ¥:POK 
EV+7,¥:POKEV+21,15 
L&LEN(Q1$(1,R)) :L2=LEN( 
Q1$(2,R)) 

PRINTTAB (14-L/2)"84 
{DowN}"Q1$(1,R) 

SE eee ate 
R 


428 


430 
440 
450 
460 
470 
480 
490 


588 
510 


520 


GE 576 
580 


598 
600 


610 
626 
630 
640 


650 
668 


PRINTTAB(10)"READ MAP" 
PRINTTAB(16)"SAIL ON" 
PRINTTAB(7) "LIST INVENT 
ORY" 

GOSUB1798 
ONKGOTO86S , 868 , 1520 ,698 
11918 

PRINT" (CLR}(3 DOWN) £83S 
AIL: {YEL}"; 
Y=81:D=4:K=1 
POKEV+3 , ¥:POKEV+21,3 
PRINT" (DOWN) £83"TAB(5)" 
NORTH" 
PRINTTAB (5) "SOUTH" 
PRINTTAB(5) "EAST" 
PRINTTAB(5) "WEST" 
GOSUB1790 
IFK=1THENR=R-5 
IFK=2THENR=R+5 
IFK=3THENR=R+1 
IFK=4THENR=R-1 

IFD( ( (TM-1)*4)+K)=1THEN 
POKEV+21,1:GOTO510 
POKE2640, 196 :POKEV+39,6 
:POKEV+37,1:POKEV+38,7: 
POKEV+21,1 

PRINT"{4 DOWNJSTORM AHE 
AD-GO ANOTHER WAY" :PRIN 
'T"(8 DOWN)":GOSUB1896:G 
OSUB1470 
GOSUB1866 :R=TM: GOTO6908 
-----) REM SEARCH---~- 
PRINT"(4 DOWN} (PUR} YOU 
{(SPACE]FIND "A1$(K,R) 
GS$=A1$(K,R) 

IFG$="A KEY" THENF1=1 
IFG$="A CUTLASS "THENF2= 


678 
680 


6908 


788 
7108 
728 


738 
748 
758 
768 
778 
788 
790 
800 
810 


820 


830 


1 

IFLEFTS (G$,7)="NOTHING" 
THENS46 

FORI=1T08 : 1FG$=I$(1I) THE 
N948 


I$(Q): Q+1 
PRINTTAB(7)"{6 DOWN)":G 
OSUB186 :GOTO510 

----- REM HIGH SEAS----- 














ME 
KE 


POKE2640,192:POKEV+39,6 


:POKEV+37,1:POKEV+38,2 


Ke1:D=. 
POKEV+3, ¥:POKEV+5,¥:POK 





‘81 


EV+21,7 


PRINTTAB (7) “{DOWN} E89RE 


AD MAP" 


1060 


1678 


1088 
1696 
1108 


1118 


1120 
11306 


1148 
1156 


1168 


11706 
1180 


1198 
12068 


1218 
1226 


12308 
1240 
1256 


1268 
1276 


1280 


1296 
1308 
1310 
1326 
1338 
1348 
1358 
1368 
1378 


1388 


PRINTTAB(7) "SAIL ON" 
GOSUB1798 
ONKGOTO1520,699 

REM TREASURE ISLA 


ND- 
POKE2046,193:POKEV+39, 
10: POKEV+37, 7 :POKEV+38 





5 

PRINT" {CLR} £83(9 DOWN] 
YOU HAVE LANDED AT TRE 
ASURE ISLAND":GOSUB189 
@:GOSUB1470 

PRINT" (DOWN }JAND FOUND 
{SPACE }THE TREASURE CH 
EST" 

PRINT"(2 DOWN) £63PRESS 
ANY KEY TO SEE IF IT 
{SPACE}WILL OPEN." 
GETKS$ : IFK$=""THEN1080 
IF Fl=1THEN1156 
PRINT" (CLR} (9 DOWN) £83 
YOU DON'T HAVE THE KEY 


PRINT" {DOWN}YOU MUST C 
ONTINUE ON YOUR JOURNE 
y," 

PRINT" (DOWNJFIND THE K 
EY AND RETURN TO 
PRINT" {DOWN} TREASURE I 
SLAND.{3 DOWN}" 
GOSUB1868 :GOTO696 


POKE2040,194:POKEV+39, 
6: POKEV+37,1:POKEV+38, 
OSUB1898 

PRINT" (CLR) E84YOUR KEY 
OPENS THE CHEST.” 
PRINT"YOU WIN" 
PRINT"{4 DOWN) £6JOTHER 
TREASURES : £83 { DOWN)" 
FORI=1T08 :PRINTI$ (I) :N 
EXT 

PRINT"{2 DOWN]E79PLAY 
(SPACEJAGAIN [Y/N] 
GETK$ : IFK$=""THEN1210 
IFK$="¥"THENPOKEV+21 , 6 
:GOTO1258 
IFK$="N"THENSYS2048 EN 
D 

GOTO1216 
PRINTTAB(9)"{3 DOWN} 
E73(PLEASE WAIT A MOME 
NT]":GOTO310 
-REM MONSTER=: 
POKEV+39, 6 :POKEV+37,2: 
POKEV+38, 1 :POKE2040,19 
5 
Y=81:D=2:K=1:POKEV+3,Y 
:POKEV+5, ¥:POKEV+21,71 
GOSUB1899 
PRINTTAB (6)" (DOWN) SAIL 
AWAY" 

PRINTTAB (8) "FIGHT" 
GOSUB1798 
IFK=2THEN1 396 
RN=RND(1):IFRN> .8THENT 
M=R:GOTO690 

PRINT"(3 DOWNJNOT FAST 
ENOUGH" 

PRINT"THE MONSTER DAMA 
GED YOUR SHIP" 
PRINT"YOU MUST GO BACK 
TO PIRATE COVE AND 
PRINT "START OVER AGAIN 
+{4 Down)" 
R=RR:GOSUB1860 :GOTO510 














1398 
1468 


14168 


1426 
14368 


1449 
1450 
1466 


1470 
1480 


1499 


1586 
1510 
1528 
1538 


1548 
1550 
1560 
1578 
1580 


1598 
1600 


16198 
1620 


1638 
1640 
1658 


1660 


1676 
1686 


1698 


1700 
1716 


1726 
1736 


1748 
1758 
1766 
1776 
1780 


1798 
1880 


18196 
1826 
1838 
1848 


1858 
1868 


1878 
1888 
1898 
1906 


1916 


IFF2=OTHEN1430 
PRINT"(2 DOWN}YOU DEFE 
ATED THE SEA MONSTER" 
PRINT"YOU MAY CONTINUE 
ON YOUR JOURNEY. 

{4 Down)" 
‘TM=R:GOSUB1860 : POKEV+2 
1,1:GOT06998 

PRINT" (2 DOWN]YOU CANN 
OT PIGHT THE MONSTER W 
ITHOUT” 

PRINT"A CUTLASS" 
GOTO1360 

----- REM SOUND SUB---- 


POKES+24,15 :POKES+5,9: 
POKES+4, 17 
POKES+1,6:POKES,108:FO 
RT=1T01000 :NEXT 


POKES+4,16 :FORT=1T025: 


POKEV+21,8 
PRINT"({CLR}(2 DOWN} "TA 
RD pO er MAP 
{2 Down)" 





X$="ORYIP" 
y$="EHI &N3" 
2$="LEPAG" 

FORI=1T05 :PRINTTAB (7); 


FORJ=1T05 : PRINTXS ; :NEX 
T:PRINT 

PRINTTAB(7); 

FORJ=1T05 : PRINTYS ; :NEX 
T:PRINT 

PRINTTAB(7); 

FORJ=1T05 :PRINTZ$ ; :NEX 
T:PRINT 

NEXT 

FORI=17T025 
IFL(I)=1THENPOKELO(I), 
81:POKELO(I)+S,5 
IFL(I)=2THENPOKELO(I), 
45 :POKELO(I)+S,6 

NEXT 
POKELO(R) , 81 :POKELO(R) 
+8,7 

PRINT" (HOME}{6 DOWN} "T 
AB(27)"(GRNJQE83 = LAN 
p" 

PRINTTAB (27) "(BLU}-E83 
= WATER" 
PRINTTAB (27)" (YELJQR82 
= CURRENT" 

PRINTTAB (31) "LOCATION" 
PRINTTAB(33)"{3 DOWN) 
{YELJN" 
PRINTTAB (33) "—' 
PRINTTAB (31) "W-Q-E" 
PRINTTAB (33) "— 
PRINTTAB (33) " 
PRINT"({4 DOWN) 
866 :GOTO510 
GETK$ : 1FK$="""THEN1790 
IFK$=CHR$(13)THENRETUR 
N 





:GOSUB1 





IFK$ <>" (DOWN) "THEN1790 
K=K+1:Y=¥+8 

IFK> DTHENK=1:Y=81 
POKEV+3 ,¥ :POKEV+5 , ¥:PO 
KEV+7,¥ 

GOT01798 

PRINTTAB (6) "£73[ PRESS 
{SPACE JANY KEY TO CONT 
INUE]" 

FK$=""THEN1878 





FORI=1T011 :POKE53280,1 
FORT=1T025 :NEXT:NEXT: P 
OKES3280,0:RETURN 

PRINT"{2 DOWN} INVENTOR 





XR 


SE 


SG 


1920 
1938 
1948 
1950 
1968 
1978 
1986 
1998 
2000 
2610 


2028 
28308 


2048 
20508 
2060 
2078 
2080 
2098 
2108 
2110 
2126 
21308 
2148 
2158 
2160 
2170 
2188 
21968 
2200 
2210 
2220 
2230 
2248 
2258 
22608 
2276 
2280 
2298 
2300 
2310 


2320 
2330 
2340 
2358 


2368 


Y:{Down)" 
FORI=1T08:PRINTI$(I):N 
EXT 
PRINT" {DOWN} ":GOSUB186 
@ :POKEV+21,1:GOTOS20 
DATA G,8,0,1,192,0,1,1 
92 

DATA 6,4,192,0,4,192,0 
120 

DATA 192,8,20,192,8,20 
193,192 

DATA 28,197,192,4,197, 
192,4,197 

DATA 192,1,197,192,1,1 
93,192,248 

DATA 192,207,63,255,25 
2,15,255,252 

DATA 3,255,252,170,187 
+190, 42,174 

DATA 234,10,170,168,9, 
178,128,255 
DATAG,0,6,0,0,68,0,0 
DATA192,3,195,0,8,51,2 
48,0 

DATA15 ,12,3,248,192,12 
18,48 

DATAG, 50,48,0,194,0,0, 
192 


DATA128,0,192,128,6,6, 
128,08 
DATAG,128,0,2,8,0,86,6 
4 


DATAS ,85,84,21,85,80,1 
185 
DATA64,0,21,0,0,0,0,0 
DATAS ,0,8,1,64,0,8,80 
DATA ,0,20,0,0,5,8,0 
DATAL ,64,0,8,80,21,85, 
eo 





Bi 
DATA16,@,16,18,170,16, 
18,34 
DATA16, 208, 32,16,16,32 
728,16 
DATA32,16,208,32,19,21 
785,88 

DATAG ,6,204,48,12,48,0 
7195 
DATA12,12,12,48,0,0,19 
2,0 
DATAG,16,6,0,32,0,06,8 


DATAG,6,8,0,0,8,0,72 
DATA32,33,34,32,136,0, 
170,08 
DATAG,158,0,10,182,160 
, 160,158 
DATA1®,128,182,2,64,17 
G,1,2 


DATA8,128,8,8,32,8,32, 
32 
DATA16,32,4,0,32,0,0,8 
DATAG,6,4,0,0,8,0,0 
DATA 1,84,0,4,1,64,4,0 
DATA 20,16,0,1,16,80,1 
17 

DATA 6,1,64,0,65,64,0, 
68 





DATA 16,1,80,5,84,128, 
128,48 

DATA 8,8,58,0,0,192,20 
8,32 


DATA 208,192,0,192,194 
+35,195,32 

DATA 3,35,0,3,3,8,3,12 
DATA ©,0,12,0,0,12,0,7 


2 

DATA TREASURE ISLAND, 
{SPACE}SEA MONSTER'S L 
AIR, BLUEBEARD'S BAY 
DATA MERMAID'S LAGOON, 
CAPT. HOOK'S SWAMP, S 
PICE ISLAND 


DATA JEWEL ISLAND, SKE 





2378 


2388 
2398 
2408 
2410 
2420 
2438 


2448 
2450 
2468 
2470 
2486 


2498 
2500 
2510 


2528 
2538 
2540 
25508 
2560 
2570 
2588 
2590 
2608 
2610 
2620 


LETON INLET, BARBARY C 
OAST, PIRATE COVE 

DATA SIFT THROUGH SAND 
» A FEW PIECES OF EIGH 
T 

DATA SEARCH ISLAND, NO 
THING OF INTEREST. 
DATA SEARCH OLD GALLEO 
N, SOME SILVER JEWELRY 
DATA SEARCH ISLAND, EX 
OTIC SPICES 

DATA SEARCH HARBOR, A 
{SPACE }CUTLASS 
DATA SEARCH SWAMP, 
HING BUT SNAKES 
DATA SEARCH JUNGLE, A 
(SPACE ] BEAUTIFUL PARRO 


NOT 


Ly 
DATA SAIL ALONG COAST, 
NOTHING OF INTEREST. 
DATA SEARCH ALONG DOCK 
+ NOTHING OF INTEREST. 
DATA SEARCH NATIVE HUT 
S, A KEY 

DATA SEARCH STREAM, NOT 
HING BUT ALLIGATORS 
DATA SEARCH ALONG CLIF 
FS, NOTHING OF INTERES 
T. 

DATA SEARCH WOODS, 
HING OF INTEREST. 
DATA SEARCH WRECKED SH 
IP, SOME GEMS 

DATA SEARCH OLD SHIP, 
{SPACE }NOTHING BUT AN 
{SPACEJOLD COMPASS. 
DATA COMB BEACHES, A 
EW DOUBLOONS 
DATA @,1,1,06,0 


Nor 





al 
1 1,8 
1 A tp i 
a 1,1 
1 1,1 
1 1,1 
2 1,1 
1 1,1 
1 1,0 
] 1,1 
’ 5,1 


DATA’ 1272 
81,1284 
DATA 1392,1395,1398,14 
01,1404 

DATA 1512,1515,1518,15 
21,1524 

DATA 1632,1635,1638,16 
41,1644 

DATA 1752,1755,1758,17 
61,1764 


127 


Turbo BootMaker 


Article on page 67. 


AC 100 


AB 110 


GP 120 


GH 130 


PQ 146 


xc 158 


PRINT"(CLR} (2 DOWN) 
(WHT) "CHRS$(8)CHR$ (14) :P 
RINT TAB(16)"** TURBOBO 
OTMAKER **":Z$=CHRS(0) 
FOR AD=822 TO 915:READ 
{ SPACE } BY : CK=CK+DY : POKE 
AD,BY:NEXT:IF CK=11597 
THEN 130 
PRINT"(2 DOWN) (RVS]ERRO 
R IN DATA STATEMENTS |": 
STOP ams 
PRINT" {DOWN} {2 SPACES}I 
NSERT A DISK CONTAINING 
‘TURBODISK." 
PRINT TAB(7)"PRESS 
{RVS} RETURN TOFF) WHEN 
READY. 
GET K$:IF K$<>CHRS(13) 
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RJ 168 


EF 178 


GA 180 


198 


208 
PH 210 


SE 220 


238 


240 


258 
268 
SE 276 


JH 280 


SH 290 


SX 300 


AC 318 


SM 320 


xP 
BX 


330 
348 


PB 350 


HP 360 


QM 376 


KQ 380 


BD 396 


PD 499 


KP 416 


IR 420 





{SPACE]THEN 150 

CLOSE 15:0PEN 15,8,15," 
I6":GOSUB 560:IF E THEN 
608 

T$="": PRINT" {DOWN ] NAME 
{SPACEJOF TURBODISK FIL 
E:":INPUT T$:IF T$="" T 
HEN 170 

OPEN 1,8,8,"0:"+TS$+",P, 
R":GET#1,A$,B$:GOSUB 50 
G:IF E THEN 688 
TL=ASC(A$+Z$) : TH=ASC(BS 
+Z$):POKE 834,TL:POKE 8 
36, TH:POKE 861, TL:POKE 
(SPACE }862,TH 
TS=49152:TE=TS: PRINT TA 
B(7)"(DOWNJREADING: "TS 
FOR SS=@ TO 1:GET#1,A$: 
SS=ST:POKE TE,ASC(AS$+2Z$ 
) sTESTE+1] :NEXT 

CLOSE 1:IF ST<>64 THEN 
{SPACE ]PRINT"{2 DOWN) 
(RVS}JERROR READING TURB 
ODISK FILE. ":STOP 
PRINT" {DOWN} INSERT THE 
DISK ON WHICH YOU WISH 
TO":PRINT" CREATE THE 
(SPACE }BOOT FILE." 
PRINT TAB(7)"PRESS 
{RVS} RETURN TOFF} WHEN 
READY. 

GET K$:IF K$<>CHR$(13) 
(SPACE) THEN 256 
PRINT#15, "I@":GOSUB500: 
IF E THENGOO 
P$="":PRINT" (DOWN }NAME 
(SPACEJOF PROGRAM TO TU 
RBOBOOT: ":INPUT P$:IF P 
$="* THEN 298 
P=LEN(P$):POKE 874,P:FO 
R I=] TO P:POKE 899+I,A 
SC(MID$(P$,I)) :NEXT 
OPEN 1,8,8,"0:"+P$+",P, 
R":GOSUB 500:CLOSE 1:1F 
E=@ THEN 310 

IF E=62 THEN PRINT" 
{DOWN} REMEMBER TO PUT 
{SPACEJA COPY OF "P$:PR 
INT" ON THIS DISK." 
PRINTTAB(5)"({DOWN}IS TH 
E PROGRAM BASIC OR ML?" 
:PRINTTAB (9) “PRESS 
(avs) B (opr) oR (Rvs) 
{SPACE]M [oFF)" 

GET K§:IF K$="B" THEN 3 
86 

IF K$<>"M" THEN 320 

AS="": INPUT" {DOWN JSTART 
ING ADDRESS"; A$:IF A$=" 
“ THEN 340 

D=0:IF LEFT$(A$,1)<>"$" 
THEN D=VAL(A$):GOTO 37 
6 

FOR I=2 TO LEN(AS) :A=(A 
SC(MID$(A$,I))AND 127)~ 
48 :D=(16*D)+A+(7*(A>9)) 
:NEXT 

DH=INT(D/256) :DL=D-(256 
*DH) :POKE 891,76:POKE 8 
92,DL:POKE 893,DH 
BS="": PRINT" {DOWN }NAME 
(SPACE }FOR TURBOBOOTING 
FILE:":INPUT BS?IF BS= 
"" THEN 380 

OPEN 1,8,8,"0:"+BS+",P, 
W":GOSUB 500:IF E THEN 
{SPACE} 660 

PRINT TAB(7)"(DOWN}WRIT 
ING: "BS 
PRINT#1,CHRS$ (38) ; CHRS(3 
) :CHRS$ (54) ;CHRS(3); 

FOR AD=808 TO 915:PRINT 
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HQ 
JA 


PA 


438 
440 
450 
580 
600 


610 


620 


630 
822 
832 
842 
852 
862 
872 
882 
892 


#1,CHRS$ ( PEEK(AD)) ; :NEXT 
FOR AD=TS TO TE:PRINT#1 
+ CHRS (PEEK (AD) ) ; NEXT 
CLOSE 1:GOSUB 500:IF E 
(SPACE}THEN 600 

CLOSE 15:PRINT"(2 DOWN} 
"BS" WILL NOW TURBOBOOT 
"PS :END 
INPUT#15,E,E$:RETURN 
CLOSE 1:PRINT" (DOWN) 
{Rvs}"; 

IF E=62 THEN PRINT"NO F 
ILE WITH THAT NAME ON T 
HIS DISK.":GOTO 170 

IF E=63 THEN PRINT "THAT 
NAME IS ALREADY USED O 
N THIS DISK.":GOTO 380 
CLOSE15 :PRINT"DISK ERRO 
Rs"; E;E$sEND 

DATA 32,138,255,169,148 
1160 ,3,133,251,132 
DATA 252,169,0,160,192, 
133,253,132,254,1608 
DATA 6,177,251,145,253, 
200 , 208,249, 230,252 
DATA 236,254,165,254,20 
1,196, 208,239,32,0 
DATA 192,32,68,229,166, 
186 ,160,1,32,186 

DATA 255,169,1,162,132, 
168,3,32,189,255 

DATA 169,0,32,213,255,1 
34,45,132,46,32 

DATA 94,166,32,142,166, 
76 ,174,167,42,0,0,0,0,8 
10,8,8,0,0,80,0,0,0,0 





Slots 


Article on page 51. 


sc 
KG 


MF 
KG 


xQ 


HS 


ED 


HD 


10 
20 


30 
40 


50 


60 


78 


80 


6 


POKES6 , 48 :POKES5 ,O:CLR:G 
oTo48 
POKEXR, YC: POKEXR+1,X : POK 
EXR+2,0:SYS65520:RETURN 
X=111¥C=23 :GOT020 

IFPEEK (888 )=237THENPOKES 
3281,15:POKE53280,15:KB= 
1981:FL=1:XR=781 :GOTO6D 


KB=239 :FL=0 :XR=2035 :POKE 
65305,241 


GOSUB470:PRINT" (CLR) 

{5 pown}":c$(@)=" (PUR) Io 
K{powN)} (3 LEFT)LMN":cS{T 
Y=" (BLU) "+RIGHTS (C$(8),1 
8) 


IFFL=@THENPOKE1 2909 ,0:PO 
KE12916, 255 

PRINT" (GRN}{2 SPACES) 
{Rvs} {4 spaces} (OFF) 
{3 spaces} (RVS) 

{2 spaces} (OFF) 

{7 spaces} {Rvs} 

{4 spaces} (OFF) 

{3 spaces}{Rvs} 

{6 SPACES} {OFF} 

{3 SPACES} {RVS} 

{4 spaces} {OFF} 

{3 spaces} {Rvs} 

{2 SPACES} {OFF) 

{2 spaces) (RvS} 

{2 spaces} (OFF) 

{2 spaces} {RvS) 

{2 SPACES}"; 

PRINT" {OFF} {6 SPACES} 
(rvs}{2 SPACES} {OFF} 
{2 spaces} {RVs} 

{2 spaces} {OFF} 

{4 spaces} {Rvs} 

{2 spaces} (OFF} 





{4 spaces} {Rvs} 
{2 spaces} {OFF} 
{2 spaces}{Rvs} 
{2 spaces} {OFF} 
{2 spAcEs}{RvS} 
{2 spaces} (OFF} 
{6 SPACES}{RvS} 
(2 spaces) (OFF} 
{6 spaces} {Rvs} 
2 SPACES}(OFF} "; 


{ 
QD 108 PRINT" (RVS}{2 SPACES} 


{orF}({4 SPACES} {Rvs} 
{2 spaces} {OFF} 
{4 spaces} {Rvs} 

(2 spaces} (oFF} 

7 sexces | (Rvay 

4 Spaces} lOFF 

{3 spaces} (Rvs) 
{2 SPACES} (OFF) 

{6 SPACES} (RVS} 

(2 spaces} (oFF} 

{2 spaces} {Rvs} 

2 BEACeS} Oey 

4 SPACES 

(2 spaces) {OFF} "; 


sD 116 meres SPACES) (RVS) 


SPACES } [OFF } 
{7 spaces} {Rvs} 
{2 spaces} (OFF) 
(2 spaces} {Rvs} 
{2 spaces} {OFF} 
{6 spaces} (RVS} 
{2 spaces} {OFF} 
SPACES} {RVs} 
SPACES } (OFF) 
SPACES} (RVS} 
SPACES} (OFF} 
SPACES) (RVS} 
SPACES } {OFF} 
SPACES) [RVS}"; 


NNONENN 


FD 120 PRINT"(2 SPACES} {OFF} 


PE 


168 
176 L1=1;SYS12445 
188 PRINT"{CLR}(2 Down} 


{2 spaces}(RvS} 
{2 SPACES} (OFF) 
{2 spaces} (Rvs) 
(2 spaces) (OFF) 
{6 spaces)(Rvs)} 
2 SPACES) (OFF) 
2 spaces) (RvS} 
2 SPACES) (OFF) 
4 SPACES}{RVS} 
2 SPACES) {OFF} 
4 SPACES} (RVS} 
2 SPACES) {OFF} 
2 SPACES)(RVS} 
2 SPACES} (OFF) 
3 SpAcEs}(RVS} 
4 SPACES} {OFF} 
{3 spaces} (Rvs}"; 


138 Boe {6 SPACES) (OFF) 


SPACES) (RVS} 
{4 SPACES} (oFF} 
{5 sPACES}{RVS} 
{2 SPACES} {OFF} 
{5 sPACEs) (RVS} 
(4 spaces) (OFF)" 


146 X=8 :YC=21:GOSUB26:PRINT 


“DO YOU WANT TO GO FIRS 
T":POKEKB,@ 


158 GETY$:IFY$<>"Y"ANDY$<>" 


N"THEN159 
L1=6 :GOSUB430 


{GRN}"SPC(4);:FORA=1TO8 
:PRINTA" “;:NEXT 


196 PRINT" (BLK}":FORA=1T016 


:PRINT"(3 SPACES}— 
{3 SPACES}~{3 SPACES}~ 
{3 SPACES 
{3 SPACES 
{3 SPACES 
:NEXT 











oH 


DH 


GQ 


cs 


BR 


Jo 
PS 
sQ 


AS 


208 
216 
228 
238 
240 


258 


260 


278 
288 


298 
3008 


318 
320 


3308 
348 


350 
368 


370 


380 


396 
4008 


410 
420 
438 


440 


450 
460 


476 


480 


490 
508 


516 


526 


530 
548 


558 
560 


571 
586 


PRINT"({3 SPACES) (RVS} 
{33 SPACES)" 
IFYS="Y"THEN250 

Y=INT( RND(TI+Y)*7+.2) 
POKE12288+Y, 255 :POKE123 
694Y,Y+9 

X=4+Y* 4:Y¥C=17 :GOSUB20:P 
RINTC$(@) 
GOSUB36:PRINT" {BLU} YOU 
R MOVE (1-8)({3 SPACES) 
{2 LEPT}";:POKEKB, 0 
GETYS$ :IFY$="L"THENGOSUB 
430 :GOSUB30:PRINT" 

{2 uP}(17 spAcEs}":GoTO 
250 
IFY$<"1"ORY$>"8"THEN260 
Y=VAL(Y$)-1 : POKE12400,Y¥ 
:TK=1 :CL=1 :GOSUB396 
IFYC<5THEN360 

GOSUB3@ :PRINT"{ PUR} COM 
PUTER MOVES ":SYS12468 
P5=PEEK(12397) :IFP5=1TH 
EN360 

Y=PEEK (12389) :TK=255 :CL 
=6 :GOSUB390 
IFP5=255THEN370 

GOSUB30 :PRINTSPC(15) ¥+1 
“{LEFT} (4 SPACES }" 
FORI=1T01806 :NEXT :GOTO2 
50 

GOSUB3@ : PRINT" {GRN} 

{5 SPACES}YOU WIN 

{8 SPACES }":GOTO380 
GOSUB30 :PRINT" (GRN} 

(5 SPACES]YOU LOSE 

{7 SPACES)" 
FORI=1 03500 :NEXT:GOTOL 
40 

P=PEEK (12369+Y) 
POKE12288+P, TK: POKE1236 
9+¥,P+9 

P1=INT(P/9) :P2=INT((P/9 
~P1)*9+.1) 

X=P2*4+4 :¥C=17-2*P1 :GOS 
UB2@ :PRINTCS$ (CL) : RETURN 
GOSUB3@ :PRINT" (GRN)} 

{2 up}(4 LEFT) 

(4 SPACESJENTER LEVEL ( 
1-4)(4 SPACES} ":POKEKB, 
0 








GETAS : FAS<"1"ORAS> "4"T 
HEN440 

L=VAL (A$ ) : IPL THENL=L-1 
POKE12399 , Lt POKE12397,0 
RETURN 

PRINT" (CLR)":X=14:¥C=12 
:GOSUB26 :PRINT" ( BLK} PLE 
ASE WAIT" 
IFFLTHENPOKES 6334 , 6 : POK 
E1,51 

IFFL=@ THENPOKE1177, 62 
FORA=0T02647 : POKEA+1 433 
6, PEEK(A+53248) :NEXTA:I 
FFL=@THENPOKE1177 , 63:GO 
T0528 

POKE1 , 55 : POKE56334,129: 
POKE53272 , 3 :GOTO530 
POKE65298 , PEEK(65298) AN 
D251 :POKE65299 , PEEK(652 
99) AND3OR56 
FORA=584T0631 : READB : POK 
EA+14336,B:NEXT 

C=@ : FORA=12462T012972:R 
EADB:C=C+B:POKEA, B:NEXT 
+IFC=58347THENRETURN 

PRINT" (CLRJERROR IN DAT 
A TOP 

DATA 6,3,15,31,63,63,12 
7,127 

DATA 254,255,255,255,25 
5,255,255,255 

DATA @,128,224,240,248, 








xa 


HB 


DD 


KD 


xQ 


HP 


BF 


QD 


cc 


BF 


HK 


GK 


638 


648 


658 


668 


678 


680 


698 


708 


716 


726 


736 


740 


769 


778 


780 


798 


800 


816 


828 


830 


840 


248,252,252 

DATA 127,127,63,63,31,1 
5,3,8 

DATA 255,255,255,255,25 
5,255,255,254 

DATA 252,252,248,248,24 
®,224,128,8 

DATA 255,1,8,248,18,246 
,247,1,255,1,255,255,1, 
255,1,8,2,8,36 

DATA 8,1,2,16,142,108,4 
8,174,167,48,189,129,48 
+24,121,93,48,153,93 
DATA 48,174,108,48,96,2 
@6,111,48,1608,7,152,153 
,81,48,136,16,249,160,8 
8 





DATA 169,0,153,6,48,136 
116,248,96,172,111,48,1 
69,0,153,97,48,9,64 
DATA 153,93,48,41,0,136 
216,243,266,169,1,141,7 
5,49,169,8,141,141,48 
DATA 169,121,141,57,49, 
169,7,141,110,48,174,11 
2,48,189,81,48,56,233,9 
DATA 157,81,48,32,12,49 
7169,107,141,141,48,174 
7112,48,189,81,48,24,10 
5 

DATA 9,157,81,48,173,18 
9,48,208,8,169,8,141,10 
9,48,76,95,49,96,198 
DATA 89,48,189,81,48,14 
1,105,48,169,6,141,106, 
48,178,173,185,48,141,1 
13 

DATA 48,173,106,48,208, 
5,169,0,141,167, 48,189, 
114,48,24,169,113,48,14 
a 


DATA 113,48,141,54,49,1 
73,1,48,217,121, 48,208, 
19,238,187,48,32,137,48 
DATA 173,1087,48,201,3,2 
08, 222,169,1,141,109,48 
+96,173,106,48,73,1,141 
DATA 106,48,232,236,110 
148,208,186 ,96,169,0,15 
3,89,48,198,89,48,189,8 
1 





DATA 48,201,54,144,30,2 
@1,63,176,8,169,0,153,9 
3,48,76,140,49,185,89 
DATA 48,153,101,48,185, 
125,48,141,109,48,153,9 
7,48,76,151,56,74,74,74 
DATA 24,121,93,48,153,9 
3,48,169,129,141,144,48 
,169,121,141,57, 49,169, 
7 

DATA 141,110,48,32,9,49 
+169,6,141,169,48,185,1 
25,48,141,75, 49,169,133 
DATA 141,144,48,169,125 
7141,57,49,169,7,141,11 
@,48,32,9,49,173,109,48 
DATA 240,12,153,97,48,1 
85,89,48,153,101,48,76, 
151,56,169,0,141,109,48 
DATA 190,89,48,189,81,4 
8,24,105,9,141,105,48,1 
696,141,186, 48,176,173 
DATA 105,48,141,113,48, 
173,106,48,208,5,169,8, 
141,167,48,189,114,48,2 
4 


DATA 109,113,48,141,113 
148,141,11,50,173,221,4 
8,217,121, 48, 208,18,238 
7107 

DATA 48,173,167,48,201, 





Pc 


SH 


SH 


BX 


Boldface 


Article on page 70. 


COMPUTE!’s GAZETTE Programs,” 
which appears before the Program 
Listings. 





GA 16 


cs 
GQ 


KeyDef 


Article on page 71, 


HC 10 
AF 26 


SF 60 


858 


860 


870 


880 


890 


9008 


910 


3,208,225,169,6,153,93, 
48,76 ,58,58,173,106,48 

DATA 73,1,141,106,48,23 
2,236,116,48,208,187,28 
11,48,246,53,190,89, 





48 

DATA 189,81,48,141,68,5 
8,185,125,48,141,221,48 
+24,169,9,125,81,48,157 
DATA 81,48,200,32,95,49 
+169,8,141,109,48,198,8 
9,48,189,81,48,56,233 
DATA 9,141,186,58,157,8 
1,48,169,6,141,221,48,1 
73,18,208,41,3,24,121 
DATA 93,48,217,97,48,14 
4,9,153,97,48,185,89,48 
,153,101,48,169,64,153 
DATA 93,48,196,89,48,22 
4,7,240,8,152,170,254,8 
9,48,76,100,49,136,48 
DATA 18,208,152,170,185 
197,48,74,282,208,252,1 
36,24,121,93,48,153,93, 
48,96 


BEFORE TYPING... 


Before typing in programs, please 
refer to “How To Type In 


INPUT" (CLR} (DOWN) FILENA 
ME"; FFS:IF FFS="" THEN 1 
t) 


OPEN 4,4,7:0PEN 6,4,6:0P 
EN 8,8,8,"0:"+FFS+",S,R" 
GET#8, A$ :FL=ST:TL$=TLS+A 
$:PS=PS+1:IF A$=CHR$(13) 
OR PS=80 THEN 58 

IF FL=@ THEN 30 
PRINT#6,CHR$ (1) :PRINT#4, 
TLS :PRINT#6, CHR$ (17) : PRI 
NT#4, TLS: TLS="":PS=0 

IF FL=0 THEN 30 

CLOSES :CLOSE6 : PRINT#4:PR 
INT#4 :CLOSE4:PRINT"END O 
F DOCUMENT" 


IF PEEK(7166)=175 THEN 5 
@:ELSE POKE 7166,175 
FAST: BANK15:FORI=9 TO 5: 
K=I: IFI=4THENK=0 : ELSEIFI 
=5THENK=4 

FORJ=6 TO 88:POKE 5888+I 
*8943, PEEK (641 28+K*89+J ) 
:NEXTJ , I 

BANK® : SLOW 
FORI=6T09 :K (I) =PEEK (4096 
+I) :POKE4096+1,0:NEXT:TR 
AP 180: DIMK$(86) :FORI=OT 
086 : READK$ (I) :NEXT 

DATA INST/DEL,RETURN,CR 
{SPACE} RT/DN,F7,F1,F3,F5 
+CR DN/UP,3,W,A,4,2,8,E, 
+54R,D,6,C,F,T,X,7,¥,6,8 
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QF 


FS 80 


CE 


SK 110 


SD 128 


130 


140 
158 


168 


FQ 170 


FK 180 


AB 100 
XH 118 


DK 
EP 


120 
130 


DR 140 


PM 150 


QA 166 


JG 176 


JE 186 


FQ 190 


JF 206 





XK 218 


+B,H,U,V,9,1,0,0,M,Ke2, 
Ny t,P,Ly—sy ee "2 "48, / 107% 


DATA CLR/HOME,,=,1,/,1,< 
+12, SPACE, ,Q,RUN/STOP ,HE 
LP,,5,TAB,2,4,7,1,ESC,+, 
-, LF, ENTER, 6,9,3,,0, +4CR 





UP,CR DN,CR LT,CR RT 





FORI=OT05 :A=5888+1*89 :PO 
KE830+1*2, AAND255 : POKES3 
1+I*2,A/256:NEXT 

IFRGR(@)=@ THEN COLORG,1 
:COLOR4, 





:COLORS ,13:ELSE 
COLOR 6,1:COLOR 5,4:FAS 





a0 
108 SCNCLR:PRINTCHRS (11) ;CH 


RS$(14) ;"KEYDEF 

PRINT" (DOWN) PRESS KEY T 
© BE REDEFINED: "; :DO:A= 
PEEK(213):LOOP UNTIL A< 
88 :PRINTK$(A) : POKE208,9 
PRINT"1> UNSHIFTED":PRI 
NT"2> SHIPT":PRINT"3> C 
OMMODORE™:PRINT"4> CONT 
ROL":PRINT"5> ALT": PRIN 
T"6> CAPS LOCK™ — 
PRINT"WHICH TABLE"; :GET 
KEYT$ :T=VAL(T$) 1 :1F(T< 
®)OR(T>5)THENP RINT :GOTO 
120 

PRINT" (DOWN JOLD ASCII C 
ODE="PEEK( 5888+T*89+A) 
INPUT"NEW ASCII CODE";C 
:IF C>255 THEN 150:ELSE 
POKESS88+T*89+A,C 
INPUT"DO ANOTHER KEY 

(2 SPACES}¥(3 LEFT}";A$ 
rIPAS="Y"THENL16 
FORI=0TO09 : POKE4096+I , K( 
I) :NEXT; END 

IF ERR=30 THEN RESUME: E 
LSE PRINT: PRINT "?"ERRS ( 
ER)" ERROR IN"EL 


TurboDisk 
Relocator 
Article on page 66. 


PRINT" (CLR) (WHT) 

{11 spaces) (RVS}TURBODI 
SK RELOCATOR( OFF} 

(2 DOWN] ":0PEN15,8,15 
OPEN2,8,4, "TBDSK «C880, P 
+R" :GOSUB160 
GET#2,A$,AS 

INPUT"NEW BOOT NAME";PN 
$:OPEN1,8,3,PNS+",P,W": 
GOSUB160 

INPUT"NEW ADDRESS FOR T 
URBODISK" ; AD: SP=INT (AD/ 
256) 
PRINT#1,CHRS (0) ;CHRS (SP 
) ; 3GOSUB180:GOSUB196:CL 
OSE1 :CLOSE2: END 
INPUT#15,E,E$,T,S:IFE=0 
THENRETURN 
PRINTE, E$ :CLOSE1 :CLOSE2 
STOP 

DIM PO(24),VO(24) sREADN 
:PORX=1TON: READPO(X) , VO 
(X) :NEXTX: RETURN 
N=1:NS$=CHRS$(@):PRINT" 
(pown} (13 RIGHT) {RVS}TA 
RGET{OFF} = 956":FORX=0 
TO956 

PRINT" {HOME} {6 DOWN}"X: 
GET#2,A$ :A=ASC(AS+NS) 
IFX=PO(N)THEN A=SP+VO(N 
) sPRINT#1,CHRS$ (A); :N=N+ 
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sx 
MB 


cB 


220 
230 
2408 


250 


260 


1:G0T0239 
PRINT#1,CHR$(A); 
NEXTX : RETURN, 

DATA 23,17,0,33,0,104,3 
,112,3,148,2,167,0,179, 
0,175,8,258,1,261,4 
DATA 274,4,277,4,286,4, 
291,1,294,1,297,4,304,1 
1314,4,321,4,326,4 
DATA 332,1,361,4,431,4 


Power BASIC: BASIC 
Line Extender 
Article on page 76. 


Program 1: BASIC Line 
Extender—64 Version 


AQ 18 POKESS,© 


QK 


QF 


QP 


PA 


AG 


HE 


cB 


ap 


HG 


JD 


FM 


208 


38 


40 


58 


60 


70 


80 


90 


108 


110 


126 


POKES6, PEEK(56) 
-1:CLI =PEEK (56) *256:P 
RINT" {CLR} (DOWN WORKING. 
oe "30a 
FORI=ADTOAD+129: READB:C= 
C+B: POKEL , B:NEXT:IFC<>13 
921THENPRINT"DATA ERR":S 
TOP 
POKEAD+4 , PEEK( 772) : POKEA 
D+5, PEEK(773) 
POKE773, AD/256:POKE772,A 
D-256*PEEK(773) 
PRINT"{CLR}(DOWN] "CHRS$( 
34)"BASIC LINE EXTENDER" 
CHRS$(34)" IS OPERATIONAL 
.":NEW 
DATA 138,240,3,76,124,16 
5,32,124,165,173,0,2, 201 
+58, 248,9, 201,92 
DATA 248,5,261,34,240,1, 
96,132,11,32,19,166,104, 
104,176,3, 76,237,164 
DATA 162,2,134,39, 202,17 
3,0,2,201,58,208,3,230,1 
1,202,134, 38,160,1,177 
DATA 95,178,136,177,95,2 
98,1,262,134,96,170, 262, 
229,95,24,101,11,144 
DATA 5,162,23,108,0,3,1 
34,95,165,45,133, 90,165 
,11,233,6,133,11,101,98 
DATA 133,88,164,46,132, 
91,144,1,208,132,89,32, 
184,163,165, 49, 164,50 
DATA 133,45,132,46,164, 
11,177, 38,145, 95,136,16 
249,76, 42,165,6 








Program 2: BASIC Line 
Extender—Plus/4 and 16 Version 


Jo 


FA 


QF 


QP 


PA 


pc 


10 
20 


38 
40 
50 


AD=828 : PRINT" {CLR} (DOWN) 
WORKING... ":C= 
FORI=ADTOAD+177 : READB: C= 
C+B:POKEI , B:NEXT:IFC<?19 
323THENPRINT "DATA ERR":S 
TOP 

POKEAD+4, PEEK(772) : POKEA 
D+5, PEEK(773) 

POKE773, AD/256:POKE772,A 
D-256*PEEK(773) 
PRINT"{CLR}(DOWN} "CHRS( 
34)"BASIC LINE EXTENDER" 
CHRS$(34)" IS OPERATIONAL 
.":NEW 


268 DATA 138,248,3,76,86,13 


7,32,86,137,132,11,162, 
255, 232,189,0,2, 201,32 


218 DATA 246,248, 201,48,144 


14,201,58,144,240,134,3 








MH 


gc 


QP 


QD 


DP 


cR 


BH 


220 


2308 


240 


250 


268 


278 


280 


298 


,189,8,2,261,58,248,9 

DATA 201,92,248,5,201,3 
4,240,1,96,162,255,232, 
189,8,2,208,258,138,56 
DATA 229,3,133,4,198,4, 
32,61,138,104,164,176,3 
1 76,133,135,165,4,133 

DATA 11,162,2,134,39,20 
2,164,3,185,0,2,201,58, 
208,3,238,11,202,138 

DATA 24,101,3,133,38,16 
@,1,177,95,178,136,177, 
95,208,1,262,134,96,178 
DATA 262,229,95,24,101, 
11,144,5,162,23,108,0,3 
1 134,95,165,45,133,90 

DATA 165,11,24,101,90,1 
33,88,164,46,132,91,144 
+1, 208,132,89,32,192,13 


6 

DATA 165,49,164,58,133, 
45,132,46,164,11,177,38 
7145,95,136,16,249,32,1 
52 

DATA 138,32,24,136,76,1 
5,135 


128 Sprite Rotator 


See instructions in article on page 74 
before typing in. 





BEFORE TYPING .. . 


Before typing in programs, please 
refer to “How To Type In 


COMPUTE!’s GAZETTE Programs,” 
which appears before the Program 
Listings. 





Program 1: Race Car Demo 


XP 
MR 
DE 
JE 


16 


98 


100 
118 
128 
138 
148 
158 


166 


FOR S=1 TO 8: 
@ : NEXT S 
COLOR 8,1 : COLOR 1,4 : 
(SPACE]COLOR 4,5 

COLOR 5,4 : GRAPHIC 0,1 
{SPACE}: SCALE 6 

PRINT "(CLR) DEMO ROTATE 
D SPRITES " 

BLOAD "DRAGSTER. SPR" 

IF DS THEN PRINT DS$ : S 
TOP 

PRINT “ USE JOYSTICK POR 
12" 

PRINT " PRESS FIRE BUTTO 
N TO QuIT" 

DIM SS$(8) 

FOR S=1 TO 8: SPRSAV S, 
SS$(S): NEXT 

SPRITE 1,1,4,0 

MOVSPR 1,156,108 

DO UNTIL gJoy(2) AND 128 
+ DO WHILE Joy(2) AND 1 


SPRITE S, 


3 
:(3 SPACES}JS%=JOY(2) A 
ND 15 


+(3 SPACES}SPRSAV SS$(J 
S%),1 





178 :(3 SPACESJON JS% GOSUB 
216,220,230, 240,250, 26 
6,278, 2780 

186 : LOOP 

198 LooP 

206 END 

216 MOVSPR 1,+0, RETURN 

226 MOVSPR 1,+5, RETURN 

230 MOVSPR 1,+7,+@ : RETURN 




















BR 248 MOVSPR 1,+5,+5 : RETURN 8){2 SPACES}1{3 LEFT}";S | EB 550 NEXT Y,X 
MQ 250 MOVSPR 1,+0,+7 : RETURN 2 PC 560 GOSUB 620:RETURN 
BJ 260 MOVSPR 1,-5,+5 : RETURN | RC 60 IF S$<1 OR S%>8 THEN 50 | KM 570 REM(2 SPACES)STAMP SPRI 
HR 270 MOVSPR 1,-7,+0 : RETURN | JQ 76 IF RSPRITE(S%,5)=1 THEN TE AND CLEAR NEW AREA 
HP 280 MOVSPR 1,-5,-5 : RETURN {SPACE}PRINT"(DOWN] SORR | AE 580 GSHAPE S$,10,10 
Y, CAN'T ROTATE MULTI-CO | SE 598 BOX 1,9,49,34,71 
Gar LOR SPRITE. ":STOP EJ 600 GSHAPE MT$,16,50:RETURN 
Program 2: Sprite Data GS 86 INPUT "{DOWN} OK TO ERAS | QK 610 REM(8 SPACES)LIFT NEW S 
E OTHER SPRITES HAPE OFF SCREEN 
PEDO 1037 SE) BE. 02,0802 'FX BS (3 spaces}¥(3 LEFT}"; aS | KA 620 SSHAPE S$,10,50,33,70:R 
GE08:00 02 AA BO G3 AE OO OB Cc nye 
: IF LEFT$(A$,1)<>"¥" T ETURN 
GE10:20 08 00 26 00 90 76 OO IF 
HEN STOP BP 630 CHAR 1,1,24,"PRESS ANY 
GE18:00 70 00 6B 70 OB OB 70 44 O z 
2 BF 96 PRINT " FOR 45 DEGREE SP ({SPACE}KEY... 
GE20:00 68 FS GO GO F8 GO GO 3F - 
RITES: {DOWN} FP 649 DO: GET A$: LOOP UNTIL 
9E28:F8 69 F9 FC F8 89 FC 88 40 D 
@£30:8B FE 88 6F FF 88 8B FE 14 | GH 160 PRINT * 1. REDUCE SIZE (SPACE Jas="" 
@£38:88 89 FC 88 FB OO FB 43 20 {SPACE}TO FIT” AJ 650 GETKEY AS 
8£40:08 88 6B GO GB GB OB GB Sc} ER 110 PRINT " 2. KEEP SAME SI | MH 668 FOR S=1 TO 8:SPRITE S,9 
GE48:88 G8 BC GB BB 1E OB BO SE 2E Py sNEXT S 
GESO:1E 88 GO GF 86 30 BF Co 10 | HM 120 PRINT “ 3. ENLARGE SIZE | CR 676 GRAPHIC @,1:GRAPHIC CLR 
8E58:68 3B 88 CC F9 OB 9B FO 4c {Down} " DK 680 PRINT "{3 DOWN}BSAVE "+ 
GE68:08 7F EO OB 2F EG OO OF 84 | CG 130 INPUT “ YOUR CHOICE (1- CHRS (34)+"FILENAME. SPR" 
GEG8:CB BB B7 CB BB 93 FO OO BF 3){2 SPACES}1{3 LEFT}"; +CHRS$(34)+",BO,P3584 TO 
GE70:01 EB GB GB CC 6 OB 98 46 sce P4096" 
GE78:08 G8 76 G6 BB 20 OB BO 23 | HE 146 IF SC%<1 OR SC%>3 THEN JB 698 PRINT CHRS(19) 
QE8O:FE 89 00 82 86 OG 82 90 49 {SPACE} 130 RA 768 RETURN 
GE88:00 82 09 GG FE G9 60 10 4D | AM 150 ON SC% GOTO 160,170,180 | cp 719 REM{20 SPACES] TRAP ROUT 
9£90:00 68 38 OO F8 7E OO 88 FD | AA 160 YO=50:SC=.5: GOTO 190 a4 
QE98:7F CO FB 7F FC 20 7F FF 23 | SQ 170 YO=46:SC=1/SQR(2):GOTO | 4. 79 GRAPHIC @ : SLOW 
QEAG:FO 7F FC 26 7F CO FB 7E 26 (sPACE}190 JA 738 PRINT "{DOWN}?" ERR$(ER 
BEAS:00 88 38 GB F8 16 OB Gd F5 | DA 180 YO=40:SC=1 B 
GEBO:FE 68 6B 82 68 6B 82 BG 79 | FI 190 xB=20 ColyagruiERes SNeDRInT?™ 
GEB8:08 82 G0 GB FE 0 68 BB 26 | OM 260 AS="":INPUT “{DOWN} FAS tebsesieanoe Ry 
GECO:08 60 GB BB DB OB GB BB 04 T MODE{3 SPACES]N ANTS OLERINT NOT EMEC CP 
GEC8:06 GB 4C OO G3 FB OB O7 71 {3 LEFT}";a$ iS Bi 
BEDO:D8 OB GF CO BB OF CO BO G1 | gm 210 IF LEFTS(A$,1)="Y" THEN | GK 768 HELP 
@ED8:6F EO 68 DF EO OB 88 FO EB FAST MD 778 STOP 
GEEO:00 4C 3B GO 38 1A 86 10 B2 | px 229 TRAP 726 
GEEB:07 CO G6 1E 86 OD 14 O08 C6 | HG 236 GRAPHIC 1,1:SCALE 0 . 
GEFO:00 OE 88 8 64 06 09 69 BO | KD 24g SPRSAV S8,1:SSHAPE MTS, Kaleidoscope 
BEFB:08 G0 OO 5B OO OO OO FF 15 1,1,24,21 os 
OFOO:F8 OO FB 89 FC 8B 8B FE 72 | sm 25g FOR S=2 TO 8:SPRSAV MTS Revisited 
GF08:88 8F FF 88 8B FE 88 89 C9 |) S:NEXT S 
OF10:FC 88 F9 FC F8 88 F8 60 97 | gs 269 FoR s=1 TO 8 Article on page 75. 
OF18:00 F8 00 08 FB OB OB 70 AC | po 27g MOVSPR S, 215,130 
OF20:20 00 70 08 O8 70 08 OO GE | GY 24g MOVSPR S,75; S*45-45 
9F28:70 68 GO 20 60 BO 20 OO CO | gx 209 SPRITE S,1,5+1,1,1,1,0 | Program 1: Kaleidoscope 
@F30:03 AE @0 G2 AA OO 62 FA EF | yp 399 NEXT S Revisited. 5 
86 03 BE GO 43 CL evisited—64 Version 
PEE) Ce es QA 310 SPRSAV 1,S$:GOSUB 580:S 
@F40:00 69 GB GB DO GB 01 98 97 SReRetes tote : 
OF48:00 01 36 30 GB FC 06 OO AO ' :M=54272 : FORN=MTOM+ 
OF50:5E 68 66 3F 69 O8 3F BG 96 | HC 328 Benes oe agess OKEN , @ :NEXT : POKEM+24 
OF58:60 7F EG 66 7F DO GO FO AB ’ 115 :POKEM+5 , 129 :POKEM+6, 
OF60:98 6C El 36 1F CO EO iF E9 | KK 330 Bee Ces 129 
OF68:00 40 OF 8 68 03 CO OB GE ‘ EJ 20 POKEM+4,17 
GF70:03 88 00 01 G8 Go OO 00 49 | CP 340 SPASAV 3,59:GOSUB 4002S | De 39 FORT=0707 :READM(T) :NEXT: 
8F78:00 06 OB BB GD G0 OB BB 96 ' DATA1,4,25,128,2,18,68,2 
OF80:00 63 F8 GB G2 98 OB B2 BO | PS 358 BEG OHECLCR Seton 580:S 55 
9F88:08 68 82 08 28 63 FB BB 69 0p BK 40 POKE5S3280,0:POKE53261,0: 
@F9G:00 40 F8 GB EO 88 3 FO FD | AA 360 SPRSAV 5,S$:GOSUB 400:S PRINT" {YEL) ":GOSUBS50 
OF98:F8 1F FO 21 FF FO 7F FF ED PRSAV S$,7 SC 58 REM ML ADDRESSES 
QFAG:FO 21 FF FO F8 1F FO 88 3D | FH 370 SPRSAV 7,S$:GOSUB 500:S | Yo 25 kaL=49664 :An49696 :CHAR=2 
OFAS:03 FS F8 8 EG 00 08 40 EA PRSAV S$,8 slaxeasaiwasse: 1, 
OFBO:08 83 FS 6B 62 G8 6B G2 EO | PQ 388 SLOW:GOSUB 630 eae 
OFBG:08 09 92 08 G8 03 FA BC 56 | PS 390 END OI SEEUG aR NTIR nT eae 
BFCO:08 OB OB G8 0 BB OH OO DE | g5 499 REM(15 SPACESJROTATE 90 | pp gg POKESEED+1,256*RND(1):PO 
OFC8:06 63 BB GB G2 BB OB B7 Co DEGREES REX TORDOREG ID TEOKECHARIE 
@FD9:CB 68 1E 86 68 15 BB CB 30 | JQ 419 cosuB Sad Da COSUnSSae O 
OFD8:GE Cl AB 84 Fl 18 GB 7C BF | 42 42g FOR X=10 TO 30 3 
7 FR 96 REM INTRO PAGE 
OFEQ:98 00 7F FO 86 3F AB OB 88 | Fo 439 FOR ¥=10 TO 30 a 
GFE8:3F 80 80 1F 96 GB DE 8 76 SA 106 PRINT"(CLR}{5 DOWN} 

CK 448 LOCATE X,Y {15 SPACES]WELCOME TO 
GFFO:01 BC 98 G1 19 BB a0 98 E7 | CK 238 anes E 0 
OFF8:08 88 70 08 92 26 o8 FF AS | KP peg RbCn (2) BTHEd ’ {2 DOWN} ":PRINT 

48-Y,X+40 {13 SPACES }uccccccccccc 
f RP 469 NEXT Y " 
Program 3: Sprite Rotator KP 470 NEXT X AQ 116 PRINT"(13 SPACES)-KALEI 
RX 488 GOSUB 620:RETURN DOSCOPE-" 
XP 10 FOR S=1 TO 8:SPRITE S,0: | on 499 REM{15 SPACES)ROTATE 45 | CK 120 PRINT"({13 SPACES]J***** 
BETES DEGREES +ee8*xK( 4 DOWN)" 
MR 26 COLOR ,1:COLOR 1,4:COLO | mp seg cosuB 578 XB 130 PRINT"T8 SPACES}PRESS A 
R 4,5 AD 516 FOR X=0 TO 26 NY KEY TO CONTINUE" _ 
QS 30 COLOR 5,4:GRAPHIC 6,1 FC 526 FOR Y=0 TO 20 GG 148 GOSUB376:POKEA, 25:GOTO4 
FF 40 PRINT “{DOWN) HI-RES SPR | MH 538 LOCATE X+10,Y+10 16 
ITE ROTATOR{DOWN}" BK 549 IF RDOT(2) THEN DRAW 1, | EF 150 REM MAIN LOOP 
Dc 58 INPUT " WHICH SPRITE (1- X®+(X-Y) *SC, ¥8+(x+¥)*SC | PE 166 IPAS="R"THENGOSUB1660 
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178 


189 


198 
200 


210 
226 


238 
248 


250 
268 
278 


286 


298 
363 


318 
326 
338 


348 
358 


368 
378 
380 
3968 
408 
416 


420 


DB 436 


HS 440 


PR 458 


PR 4608 


SQ 478 


JA 480 


JG 490 


FC 588 


510 
Pc 


520 


DF 


QA 
Do 


538 
540 
558 





SYSKAL: POKEM+1,RND(1)*5, 
5+5 :FORI=1T0D:NEXT:GETA 
$:IFAS=""THEN170 

V=VAL (A$) : IFAS="@"THEND 
=1 

IFV>OTHEND=2.4TV 
Q""THENGOSUB1076 :E 





FORI=6TO7 : IFA$=CHR$ (133 
+1) THENPOKEA, M(I) 
NEXTI: IFA$="B"THENGOSUB 
336 





C"THENGOSUB358 
IPAS$=CHR$ (19) THENPRINTC 
HR$ (147) :GOTO170 
IFA$="H "THENGOSUB1076 :G 
oT04: 
IPA$="_"THENGOSUB370 
IFAS="P"ANDPEEK (49692 )= 
1 THENGOSUB1680:WAIT198, 
a 











D"ANDPEEK (49692 )= 
ITHENFG=15 GOSUB1686 :WAI 
T198,1 
IFAS$="S"THENSI=ABS (SI-1 
5) :POKEM+24, SI 
IPAS="P"THENGOSUB1616:P 
OKEM+24, SI 

Goro16a 

REM BLACK AND WHITE 
POKE53280,11:POKE53281, 
11:POKE49692,1:RETURN 
REM COLOR 

POKE53286 ,@:POKE53281,8 
:POKE49692,15 :RETURN 
REM HIT ANY 

FAS <> ""THEN376 
PAS=""THEN380 





RETURN 


REM HELP MESSAGE 
PRINT"{CLR}(17 SPACES}C 
ONTROLS{ DOWN} 

PRINT"{2 SPACES)SHIFT-P 
/D(3 SPACES}: PRINT/2-W 
IDE (B/W ONLY)" 

PRINT" (DOWN)JF1 THROUGH 
{SPACE}F8 : CONTROL COM 
PLEXITY{DOWN}" 

PRINT" @ THROUGH 9 

{2 SPACES}: CONTROL SPE 
ED{DOWN}" 

PRINT"(5 SPACES}B/C 

{6 SPACES}: BLACK AND W 
HITE/COLOR{ DOWN} " 
PRINT"(4 SPACES}SPACE 
{5 SPACES}: FREEZE DISP 
LAY" 

PRINT" (DOWN} {5 SPACES}C 
LR{6 SPACES}: CLEAR SCR 
EEN" :PRINT" { DOWN} 

(6 SPACES}H(7 SPACES}: 
{SPACE} HELP 1" 

PRINT" {DOWN} {6 SPACES}S 
(7 SPACES}: SILENCE TOG 
GLE" 

PRINT" (DOWN} {6 SPACES}P 
{7 SPACES}: PROGRAM CHA 
RACTER" 

PRINT" {DOWN} {6 SPACES}R 
{7 SPACES}: RANDOMIZED 
{ SPACE }CHARACTERS { DOWN} 


PRINT"{6 SPACES)Q 

{7 SPACES}: QUIT" 
PRINT" {DOWN} HIT ANY KE 
Y TO START THE KALEIDOS 
COPE {HOME} “:GOSUB374 :PR 
INTCHRS (147) 

GOTO176 

REM LOAD ML 
PRINTCHRS(147)"..-LOADI 
NG ML" 
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PH 


sD 


cs 
ss 


560 S=@ :C=49664:FORI=CTOC+2 
48 :READX:POKEI,X:S=S+X: 
NEXT 
IFS<>33124THENPRINT"ERR 
OR IN DATA STATEMENTS": 
END 

RETURN 

DATA 173,32,194,133,165 
132 
DATA33,194,32,90,194,32 
DATA33,194,32,90,194,19 


578 


580 
598 


600 
610 


8 
DATA165, 208, 248,238,240 
7193 
DATA173,246,193,41,15,1 
33 
DATA252,96,25,32,43,194 
DATA32,65,194,32,43,194 
DATA96 ,32,172,194,32,74 
DATA194,32,172,194,32,8 


626 
630 


640 
650 
660 
670 
2 
680 DATA194,32,172,194,32,7 
4 
DATA194,32,172,194,96,1 
65 
DATA253 ,164,254,133,254 
1132 
DATA253 , 96 ,169,24,56,22 
9 


690 
700 
710 
726 DATA253,133,253,96,169, 
738 BATASG ,229, 254,133,254, 
BATA32,109,194,144,7,32 
DATA169,194,144,28,176, 
DATAI2,109,194,144,43,1 
daraS0,14,127,194,46,12 


7408 
758 


768 
778 


788 DATA194,144,8,173,127,1 
94 

798 DATA73,45,141,127,194,9 
6 

8008 


810 


DATA189,12,198,253,16,4 
DATA169,24,133,253,96,2 
30 
DATA253,165,253,201,25, 
208 

DATA4 ,169,8,133,253,96 
DATA198,254,16,4,169,24 
DATA133,254,96,230,254, 
165 

DATA254, 201,25, 208,4,16 


826 
838 
848 
850 
860 


870 
880 


9 

DATA ,133,254,96,32,193 
DATA194,165,251,160,0,1 
45 
DATA163,169,212,24,101, 
164 
DATA133,164,165,252,145 
7163 

DATA96 ,169,4,133,164,16 


898 
900 
918 


5 
926 DATA253,24,1085,7,133,16 
3 


938 DATA166,254,160,08,32,23 
a 


948 DATA194,32,230,194,32,2 
958 caahisoztes iioasaar2 
BATA194,32,230,194,32,2 
DATAL94,96,138,10,170,1 
caraaaitente 724,138,168 
bara163,133,263,152,161 


966 
970 


980 


996 
1000’ DATA133,164,96 
1016 GOSUB1676:PRINT" {HOME } 





{5 Down} (6 SPACES): 

{7 LEFT)"; :INPUT"#"; NU 
$:IFNU$="R{2 SPACES}"T 
HEN1646 
NU=VAL (NUS ) : TFNU<@ORNU 
>255THEN1G16 
POKECHAR , NU 
PRINT"{HOME}{5 DOWN} 
(7 SPACES)":PRINT" 

{14 SPACES)" 

RETURN 

POKECHAR, PEEK(162) :RET 
URN 

POKEM+24,:RETURN 
SS=55303 :CC=40 :RR=24:W 
W=25 :GOSUB1078 

OPEN4 , 4: FORG=0 TORR: PRI 
NT#4,CHR$(15); 
IFFGTHENFORF=1T02 :PRIN 
T#4,,CHRS(14); 
FORN=SS+G*CCTOSS+G*CC+ 
WwW:Q=PEEK(N) 

IF(QAND15 )=1THENPRINT# 
4,"X"; 

IF (QAND15) <>1THENPRINT 
#4," 
NEXTN:PRINT#4 ,CHRS$(8) = 
IFFGTHENNEXTF 

NEXTG : FORN=1T04 : PRINT# 
4:NEXT: CLOSE4 :FG=@:RET 
URN 





EX 18628 
1636 
16498 
AD 1058 
1868 


1078 
1685 


1696 
1168 
Kc 1118 
1128 


1136 





HD 1146 


1158 


Program 2: Kaleidoscope 
Revisited—Plus/4 and 16 Version 


HR 16 POKE56,60:CLR:FORI=OT07: 
READM(I) :NEXT:DATA1,2,4, 
16,25,68,128,255 + 
FORI=1T08 :KEYI ,CHRS (132+ 
I) :NEXT:COLORG,1:COLOR4, 
1:VL=8:PRINT"(YEL}":GOSU 
B520 

REM * ML ROUTINE ADDRESS 
Es * 

KAL=15617 :A=15651 :CH=3:X 
Y=6 

SEED=KAL+128 : POKESEED , 25 
5*RND(-TI)+1:REM * SEED 
{SPACE}RANDOM # GEN * 
POKESEED+1, 256*RND(1) :PO 
KEX , 6 :POKEY , @: POKECH , 228 
:GOSUB320 

REM * INTRO PAGE * 
PRINT"({CLR}{5 DOWN} 

{15 SPACES}WELCOME TO 

{2 DOWN] ":PRINT" 

(13 SPACES }uccecccecccce 


20 





368 
40 





58 





68 


78 
88 


FB 99 PRINT"{13 SPACES}-KALEID 
OSCOPE-" 
108 PRINT™{13 SPACES}J***** 
#*e***%K(4 DOWN) "ZPRINT 
[8 SPACES}PRESS ANY KE 
Y TO CONTINUE” 
GOSUB346:POKEA, 25:GOTO3 
80 
REM * MAIN LOOP * 
IFA$="R"THENGOSUB130 
SYSKAL: VOLVL: SOUND 1, IN 
T(RND(1)*1624),10:FOR: 
1TOD:NEXT: GETAS : IFAS=" 
THEN140 
V=VAL(A$) : FAS="0"THEND 
=1 
IFV> OTHEND=2.4TV 
IFA$="Q"THENEND 
FORI=0T07 : IPAS=CHR$ (133 
+I) THENPOKEA, M(I) 
NEXTI: I FAS="B "THENGOSUB 
306 
IFA$="C "THENGOSUB3 20 


PE 





116 


128 
130 
148 





158 


168 
176 
189 


HR 198 


GK 200 








SX 


CR 


xP 


QD 


DD 


EG 


Qu 


ED 


KK 


PG 


cB 
ca 


HM 


GD 


GQ 


218 
220 


2308 
248 


2508 


268 
278 
286 


298 
3868 


318 
328 


338 
348 
350 
368 
3708 
380 


398 


400 


410 


428 


430 


440 


450 


460 


470 


480 


498 


508 
510 


520 
530 
540 
558 
568 
578 


580 
598 


IFA$=CHR§ (19) THENPRINTC 
HR$ (147) :GOTO149 
IFAS="H"THEN386 
IFA$="_"THENGOSUB349 
'P"ANDPEEK (15645 )= 
112THENGOSUB10640 :WAIT23 
91 
IFA$="D"ANDPEEK (15645 )= 
112THENFG=1 :GOSUB1046 :W 
AIT239 
IFA$="S "THENVL=-(VL=8 )* 
8:VOLVL 
IFA$="P"THENGOSUB98B 
GOTO136 

REM * BLACK AND WHITE * 
COLOR 6,2,3:COLOR 4,2,3 
+POKE15645,112:POKE1564 
7,113 :RETURN 

REM * COLOR * 

COLOR 8,1:COLOR 4,1:POK 
E15645 ,O:POKE15647,127: 
RETURN 

REM * HIT ANY * 

GETA$ :IFA$ ¢>""THEN340 
GETA$ :IFAS=""THEN350 
RETURN 

REM * HELP MESSAGE * 
PRINT" (CLR) (14 SPACES}C 
ONTROLS[ DOWN)" 

PRINT"({2 SPACES)SHIFT-P 
/D(3 SPACES}: PRINT/2-W 
IDE (B/W ONLY)" 

PRINT" {DOWN}F1 THROUGH 
(SPACEJF8 : CONTROL COM 
PLEXITY{ DOWN} " 

PRINT" @ THROUGH 

(2 SPACES}9 : CONTROL S 
PEED{ DOWN)" 

PRINT" (5 SPACES)B/C 

{6 SPACES}: BLACK AND W 
HITE/COLOR{ DOWN}" 
PRINT"({4 SPACES)SPACE 
{5 SPACES}: FREEZE DISP 
Lay" 

PRINT" (DOWN) (5 SPACES}C 
LR(6 SPACES): CLEAR SCR 
EEN" :PRINT" {DOWN} 

(6 SPACES)H(7 SPACES}: 
{SPACE} HELP|" 

PRINT" {DOWN} (6 SPACES)S 
{7 SPACES}: SILENCE TOG 
GLE" 

PRINT" (DOWN) (6 SPACES}P 
{7 SPACES]: PROGRAM CHA 
RACTER" 

PRINT" (DOWN) (6 SPACESJR 
{7 SPACES}: RANDOMIZED 
(SPACE ]CHARACTERS { DOWN) 








PRINT"{6 SPACES)Q 

(7 SPACES}: Quit" 
PRINT" (DOWN) HIT ANY KE 
Y TO START THE KALEIDOS 
COPE (HOME) ":GOSUB346 :PR 
INTCHR$ (147) 

GoTo149 

REM * LOAD ML ROUTINES 
(SPACE}* 


PRINTCHR$(147)"...LOADI 
NG ML" 





$=0:C=15617 :FORI=CTOC+2 
5@:READX :POKEI ,X:S=S+X: 
NEXT 
IFS<>22993THENPRINT "ERR 
OR IN DATA STATEMENTS": 
END 

RETURN 

DATA 173,35,61,133,162, 
32 

DATA 36,61,32,93,61,32 
DATA 36,61,32,93,61,198 


DATA 162,208,240,238,0, 





BG 600 


PK 


26s 


xs 


618 
620 
630 
640 
650 
660 
678 
680 
690 
700 


718 
728 
730 
740 
758 
760 
770 
780 
798 
800 
810 
820 
830 
848 
850 
860 
870 
880 


890 
908 


910 


x 
9208 
1 


930 


1 
948 


9508 
968 


970 
988 


9968 

1008 
1618 
1020 
1630 
1048 
1050 


1068 


1678 


1680 
1698 


173,0,61,9,0,41 
127,133,4,96,25,32 
46 ,61,32,68,61,32 
46 ,61,96,32,175,61 
32,77,61,32,175,61 
32,85,61,32,175,61 
32,77,61,32,175,61 
96,165,5,164,6,133 
6,132,5,96,169,24 
56,229,5,133,5,96 
169,24,56,229,6,13 


6,96,32,112,61,144 
7,32,112,61,144,28 
176,35,32,112,61,1 


43,176,508,14,130,6 
46,129,61,144,8,17 
130,61,73,45,141,1 


61,96,11,194,198,5 
16,4,169,24,133,5 
96,230,5,165,5,201 
25,208,4,169,0,133 
5,96,198,6,16,4 
169,24,133,6,96,23 


6,165,6,201,25,208 
4,169,6,133,6,96 
32,196,61,165,3,16 


8,145,160,169,252, 
101,161,133,161,16 
145,168,96,169,12, 


161,165,5,24,105,7 
133,168,166,6,168, 


32,233,61,32,233,6 
32,233,61,32,240,6 
32,233,61,32,233,6 
32,240,61,96,138,1 
176,152,42,168,96, 


138,101,168,133,16 
0,152 

DATA 101,161,133,161,96 
a ee Ee DOWN} 

(6 SPACES}:{7 LEFT)";:I 
NPUT" #";NUS$ :IFNUS="R 

(2 SPACES} "THEN1616 
NU=VAL (NUS ) :I FNU<@ORNU> 
255THEN98O 

POKECH , NU 

PRINT" (HOME) (5 DOWN) 
(7 SPACES}":PRINT" 

(14 SPACES)" 

RETURN 


POKECH , PEEK(165) :RETUR 
N 


SS=2055 :CC=40 :RR=24:WW 
=25 

OPEN4 , 4 :FORG=6 TORR: PRI 
NT#4,CHRS$(15);:REM 152 
5, 801, 803 PRINTERS 
IF FGTHENF ORF=1T02 :PRIN 
T#4 ,CHRS(14); 
FORN=SS+G*CCTOSS+G*CC+ 
WW:Q=PEEK(N) 

IF (QAND15 )=1THENPRINT# 
4,"X"; 

IF(QAND15) <>1THENPRINT 
#4," "; 





PH 1168 NEXTN:PRINT#4 ,CHR$(8): 


IF FGTHENNEXTF 


QE 1116 NEXTG:FORN=1T04:PRINT# 


4 :NEXT:CLOSE4 tFG=0 :RET 
URN 


Program 3: Kaleidoscope 
Revisited—VIC Version 


RS 16 POKES6,28:CLI 


MD 
QB 
ss 


XH 





26 
30 
40 


58 


60 


78 


80 


90 





ORI =OTO7: 
READM(I) :NEXT:DATA1,4,25 
1128,2,10,68,255 
POKE36879,8:PRINT"({YEL}" 
:$1=36875 :GOSUB460 
169:A=7201 :CH=251:X 
=253:Y=254 
SE=KAL+126 : POKESE , 255*RN 
D(-TI)+1 

POKESE+1, 256*RND(1) :POKE 
X,0:POKEY ,@ :POKECH , 228 :G 
OSUB296 

PRINT" {CLR} (5 DOWN} 

{6 SPACES ]WELCOME TO 

(2 DOWN) ":PRINT" 

(4 spaces }uccccccccccccl 


PRINT"{4 SPACES}-KALEIDO 
SCOPE-" 

PRINT™(4 SPACES) J******* 
s****K{4 DOWN)":PRINT HI 
TA KEY TO CONTINUE" 
GOSUB300 : POKEA, 25 :GOTO33 
] 





160 IFA$="R"THENGOSUB920 
110 POKES1+3 , VL: SYSKAL: POKE 


376 


S1,128+RND(1)*128:FORI= 
LTOD:NEXT:GETAS :1PAS="" 
THEN116 

V=VAL(A$) :1FAS="0"THEND 
al 

IFV>OTHEND=2.4TV 
IFA$="Q"THENGOSUB930: EN. 
D 

FORI=0T07 : LFA$=CHR$ (133 
+1) THENPOKEA, M(I) 
“THENGOSUB 








NEXTI: TFAS="B 
270 
IFA$="C"THENGOSUB290 
IFA$=CHRS (19) THENPRTNT" 
{CLR}":GOTO110 

IFA$="H "THENGOSUB930 :GO 
70330 


“THENGOSUB300 
'P"ANDPEEK(7197)=1 
‘THENGOSUB940 :WAIT198,1 
IPAS="D"ANDPEEK (7197 )=1 
THENFG=1 :GOSUB940 :WAITL 
98,1 

IFA$="S "THENVL=ABS ( VL~1 
5) :POKES1+3, VL 
IFA$="P"THENGOSUB880 
coro100 

REM B&W 
POKE36879,110:POKE7197, 
1:RETURN 

REM COLOR 
POKE36879, 8 :POKE7197,7: 
RETURN 

GETAS : IFAS <>""THEN300 
GETAS : IFA$=""THEN316 
RETURN 

PRINT" (CLR) (6 SPACES]CO 
NTROLS" 

PRINT" (RVS}]SHIFT-P/D 
{OFF} :PRINT/2-WIDE"; 
PRINT" (DOWN) (RVS]F1-F8 
{OFF}:ALTER COMPLEXITY" 
PRINT" ({RVSJ8-9{OFF} 
(2_SPACES}:ALTER SPEED" 
PRINT" (DOWN) (RVS}B{OFF} 
/(RvS}C(OFF}{2 SPACES}: 
B&W OR COLOR" 
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°K 380 PRINT" {DOWN} (RVS}]SPACE 
{OFF]:FREEZE DISPLAY" 

FP 398 PRINT" (DOWN}{RVS}CLR 
{OFF}{2 SPACES}:CLEAR S 
CREEN": PRINT" ( DOWN} 
(rvs}]H(OFF}{4 SPACES) :H 


ELP! {DOWN} " 


Co 400 PRINT" (RVS)S(OFF} 


(4 SPACES}:SILENCE TOGG 


LE( DOWN)" 

PRINT" {RVS}P{OFF} 
RAM A CHARACTER" 

PRINT" (RVS}R(OFF} 


SG 410 


XD 428 


OM CHARACTERS { DOWN)" 
PRINT"({RVSJQ(OFF} :QUIT 


BP 430 
KS 449 


UB300:PRINT"{CLR}" 
HR 458 GOTOL1O 
QD 468 PRINT"{CLR).. 


XT 
HQ 470 
OR IN DATA.":END 

BE 480 RETURN 


KM 490 


MS 588 
GK 519 
QP 520 


ce 530 
sc 546 


EG 558 
AQ 560 
QA 578 
GD 588 
PA 596 


HF 668 


QD 610 DATA 253,96,169,26,56,2 


MD 620 
AE 630 


RX 640 
SF 650 


AX 666 
FJ 678 
RH 680 
BQ 699 
RF 7068 
KB 710 
MG 726 


FG 730 
FM 748 


cQ 758 
PE 760 
AC 770 
oR 788 
AR 796 


RA 808 
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PRINT"(2 SPACESJHIT A K 
EY TO START(HOME)"; :GOS 


«LOADING M 
L":C=7169:FORI=CTOC+231 
:READX : POKEI ,X:S=S+X:NE 


IFS <> 2591 0THENP RINT "ERR 


173,33,28,133,165, 
34, 28,32,91,28,32 
34,28,32,91,28,198 
165,208, 246,238,8, 


173,0,28,41,7,133 
252,96,128,32,44,2 


32,66,28,32,44,28 
DATA 96,32,173,28,32,75 
28,32,173,28,32,83 
28,32,173,28,32,75 
28,32,173,28,96,16 


253,164,254,133,25 


253,133,253,96,169 
56,229,254,133,254 


32,110,28,144,7,32 
116,28,144,28,176, 


32,110,28,144,43,1 
50,14,128,28,46,12 
28,144,8,173,128,2 
73,45,141,128,28,9 
59,172,198,253,16, 
169,20,133,253,96, 
253,165,253,201,21 


4,169,6,133,253,96 
198,254,16,4,169,2 


133,254,96,2308,254 
254,201,21,208,4,1 
DATA 6,133,254,96,32,19 
28,165,251,160,0,1 
163,169,120,24,101 


133,164,165,252,14 





AT 
XG! 


810 
820 
830 
840 
850 
860 


870 
880 


898 
960 
916 


920 
930 
940 


958 


968 
976 


980 
990 


DATA 96,169,30,133,164, 


DATA 253,24,105,1,133,1 
eon 166,254,168,0,169, 
BAER 133,2,32,221,28,19 
DATA 2,208,249,96,24,13 
on 101,163,133,163,15 
2,101 


DATA 164,133,164,96 
GOSUB9 36 : PRINT" (HOME } 
(4 Down) {6 SPACES): 

{7 LEFT)"; INPUT" #"; NUS. 
+IFNU$="R(2 SPACES)"THE 
N910 

NU=VAL (NUS ) : I FNU<@ORNU> 
255THENS8O 

POKECH , NU 

PRINT" {HOME} (4 DOWN} 

{7 SPACES)":PRINT" 

{14 SPACES)":RETURN 
POKECH , PEEK( 162) :RETURN 
POKES1+3 ,6:RETURN 
$S=38401 :CC=22:RR=20:WW 
=20 :GOSUB930 

OPEN4 ,4:FORG=OTORR: PRIN 
784 ,CHRS(15);:REM 1525, 
861, 883 PRINTERS 
IFFGTHENFORF=1T02 : PRINT 
#4,CHRS(14); 
FORN=SS+G*CCTOSS+G*CC+W 
W:Q=PEEK(N) 

IF (QAND15)=1THENPRINT#4 


Due Sie 
IF (QAND15 )<>1THENPRINT# 
4," "5 


108 NEXTN:PRINT#4 ,CHRS$ (8): 


IPFGTHENNEXTF 


1010 NEXTG :FORN=1T04 :PRINT# 


4:NEXT:CLOSE4 :FG= 
URN 





:RET 


Expandable 
Graphics Dump 


Article on page 59. 





BEFORE TYPING ... 


Before typing in programs, please 
refer to “How To Type In 
COMPUTE!’s GAZETTE Programs,” 
which appears before the Program 
Listings. 





Program 1: Expandable Graphics 
Dump—64 Version 


MK 100 PRINT" 


EE 


oA 


KM 


aq 
AD 


110 


126 


136 


149 
150 





CLR} {3 DOWN} 
{WHT}"SPC(14)"PLEASE WA 
IT" :GOSUB338 

PRINT" (CLR]SPECIFY GRAP 
HIC SOURCE" 

PRINT"(2 DOWN}PRESS (1) 
FOR HIRES OTHER THAN 
{28 SPACES)PRINT SHOP" 
PRINT" (DOWN) OR 

{3 SPACES}(2) FOR PRINT 
SHOP(3 DOWN}" 

POKE 198,6:WAIT 198,1:G 
ET GS$:GS=VAL(GS$) 

IF GS<>1 AND GS<>2 THEN 
149 





cG 


MG 


PS 


HP 


HA 


AQ 


BQ 


KD 


DS 


FX 


PE 


EX 


cM 


KE 


160 
176 


180 
198 
200 
210 
220 


230 
248 


250 


260 
270 


280 
2968 
368 
318 
320 
330 


348 
358 


360 


378 


388 


3908 


400 


41a 


420 


430 


440 


450 


460 


470 


480 


490 


POKE 12272,GS 
PRINT"PRESS (1) FOR NOR 
MAL SIZE PRINTOUT" 
PRINT" {DOWN} OR 

(3 SPACES}(2) FOR ENLAR 
GED PRINTOUT{3 DOWN)" 
GS=6 

POKE 198,0:WAIT198,1:GE 
T GS$:GS=VAL(GS$) 

IF GS<>1 AND GS¢>2 THEN 
208 

(IF GS=2 THEN GS=1:GoTO2 
48 


Gs=0 

POKE 12274,GS:IF GS THE 
N290 

PRINT"ENTER SPACE OVER 
{SPACE]VALUE (0-40)" 
INPUT GS 

IF GS<@ OR GS>40 THEN25 
8 

POKE 12273,GS 

POKE 785,06 

POKE 786,48 

X1=USR(0) 

Gorol1d 

C= :FOR A=12288 TO 1306 
4:READ B:POKEA,B:C=C+Br 
NEXT:IF C=83337 THEN RE 
TURN 

PRINT "{CLR}ERROR IN DA 
TA":STOP 

DATA 173,242,47,201,1,2 
40,23,173,241,47,133,10 
24,165,48,141,120,50,3 
2 

DATA 66,48,32,93,48,32, 
187,48, 76,107,49,32,66, 
48,32,93,48,32,107 
DATA 48,169,6,141,241,4 
7,133,18,169,80,141,128 
158,76,121,50,162,8,230 
DATA 3,208,2,230,4,262, 
208,247,96,173,240,47,2 
@1,1,208,5,169,96,76 
DATA 80,48,169,64,141,1 
17,58,133,4,169,,141,1 
16 ,58,133,3,96, 24,165 
DATA 3,105,64,133,13,16 
5,4,105,31,133,14,96,16 
9,8,32,189,255,169,4 
DATA 162,4,166,255,32,1 
86, 255,32,192,255,32,28 
4,255,162,4,32, 201,255, 
169 

DATA 13,32,210,255,169, 
0,32,189,255,169,6,162, 
4,168,6,32,186,255,32 
DATA 192,255,32,204,255 
1162,6,32,201,255,169,2 
®,32,210,255,169,0,32,1 
89 

DATA 255,169,5,162,4,16 
8,5,32,186,255,32,192,2 
55,32,204,255,162,4,32 
DATA 201,255,169,141,32 
1210,255,96,32, 204,255, 
162,5,32,201,255,162,8, 
189 

DATA 105,50,32,210,255, 
232,224,8,208,245,169,1 
3,32,210, 255,32, 204,255 
1162 

DATA 4,32,201,255,166,1 
©, 248,8,169,29,32,210,2 
55,262, 208,248,169, 254, 
32 

DATA 210,255,169,141,32 
+216,255,96,238,10,165, 
16, 285,126,58,208,13,17 
3,241 

DATA 47,133,10,206,96,5 

















xB 


FH 


GR 


EM 


cr 


HE 


RD 


BX 


HE 


BK 


SA 


Gb 


sD 


xs 


xs 


FA 


SG 


cc 


BP 


508 


516 


520 


538 


546 


558 


560 


578 


580 


590 


600 


610 


620 


630 


640 


650 


660 


678 


680 


698 


788 


18 


728 


738 


®,169,13,32,216,255,96, 
169,9,141,185,56,141,18 
6 


DATA 56,141,167,56,141, 
108,56,141,169,56,141,1 
16,58,141,111,56,141,11 
2,58 

DATA 162,8,168,0,185,97 
+58,61,78,58,249,9,185, 
78,58,29,105,50,157 
DATA 105,50,200,192,8,2 
48,3,76,52,49,232,224,8 
1248,3,76,50,49,96 
DATA 165,3,197,13,208,1 
4,165,4,197,14,208,8,16 
9,15,141,113,56,32,231 
DATA 255,96,169,6,141,1 
13,58,169,8,141,95,50,1 
60,0,177,3,240,3,238 
DATA 95,58,153,97,58,22 
®,192,8,208,241,173,95, 
58,208,17,32,255,48,32 
DATA 54,48,32,86,49,173 
7113,50,208,12,76,112,4 
9,32,22,49,32,198,48 
DATA 76,139,49,96,160,0 
1162,9,173,94,50,208,2, 
168,4,177,3,157,97 
DATA 50,206,232,224,4,2 
40,3,76,177,49,173,115, 
58,248,3,76,217,49,166 
DATA 3,185,97,50,74,74, 
74,74,153,97,58,136,48, 
3,76,201,49,160,3 

DATA 185,97,50,45,114,5 
8,153,97,50,136,48,3,76 
1219,49,24,173,97,58 
DATA 109,98,50,109,99,5 
8,189,108,58,248,6,169, 
®,141,95,58,96,169,1 
DATA 141,95,58,96,172,1 
00,50,185,78,56,141,104 
158,141,103,50,172,99,5 
® 








DATA 185,78,56,141,102, 
50,141,101,50,172,98,50 
1185,78,58,141,106,50,1 
41 

DATA 99,56,172,97,50,18 
5,78,56,141,98,50,141,9 
7,50,96,173,118,58,133 
DATA 3,173,119,58,133,4 
1169,0,141,94,58,96,128 
164,32,16,8,4,2 

DATA 1,0,3,12,15,48,51, 
60,63,192,195,204,207,2 
40,243,252,255,192,192 
DATA 192,192,192,56,15, 
1,8,96,0,126,80,169,0,1 
41,99,58,169,1,15 

DATA 82,50,141,80,50,16 
5,169,0,141,113,50,169, 
1,141,96,58,141,94,50 
DATA 165,3,141,118,58,1 
65,4,141,119,56,32,177, 
50,173,94,56,248,6,32 
DATA 54,58,76,134,58,17 
3,113,56,201,56,248,8,1 
69,1,141,94,58,76,134 
DATA 56,32,231,255,96,1 
69,0,141,115,508,32,166, 
49,173,95,58,240,3,76 
DATA 262,50,32,5,508,32, 
22,49,32,198,48,230,10, 
169,1,141,115,56,32 
DATA 166,49,173,95,508,2 
48,3,76,229,58,32,5,50, 
32,22,49,32,198,48 
DATA 32,54,48,32,255,48 
+173,96,50,208,7,238,96 
758,238,113,50,96,169 








BH 758 DATA 9,141,115,58,76,18 


Program 2: 


2,56,68,65,255,255,255, 
255,255,255,255,255 


Graphics 


Dump—128 And Plus/4 Version 


KJ 16 GRAPHIC1:GRAPHICO:C=6:PR 


GF 
MH 


MR 


ag 


EP 


BX 


ce 


cK 


cr 


cK 


FF 


INT" (CLR} {4 DOWN}"SPC(14 
)"PLEASE WAIT" :GOSUB180 





28 POKE4848,1 

38 PRINT"(CLR}{3 DOWNJSPECI 
FY 1:1 OR BLOW-UP" 

48 PRINT" (RETURN )=1:1 
(5 SPACES}2.)BLOW-UP 

58 GS=8 

68 INPUT GS 

70 IF GS=2THENGOTO9O 

88 GS=0 :GOTO108 

98 Gs=1 

168 POKE 4858,GS:IFGSTHEN16 
C) 

110 PRINT"ENTER SPACE OVER 
{SPACE)VALUE (8-40)" 

120 INPUT Gs 

130 IF GS<OTHEN GOTO116 

140 IF GS>4@THEN GOTO110 

158 POKE4849,GS 

168 SYS DEC("1300") 

178 GOTO28 

188 FORA=4864T05631 :READB:C 
=C+B:POKEA, B1NEXT:1FC=7 
7627THENRETURN 

198 PRINT"ERROR IN DATA":ST 
oP 

208 DATA 173,242,18,201,1,2 
46, 23,173,241,18,133,10 
124,185,48,141,126,21,3 
2 

210 DATA 66,19,32,93,19,32, 
167,19, 76,107,20,32,66, 
19,32,93,19,32,107 

226 DATA 19,169,0,141,241,1 
8,133,10,169,80,141,120 
+21,76,121,21,162,8,230 

236 DATA 3,208,2,230,4,202, 
208, 247,96,173,240,18,2 
81,1,208,5,169,32,76 

240 DATA 88,19,169,32,141,1 
17,21,133,4,169,0,141,1 
16,21,133,3,96,24,165 

250 DATA 3,165,64,133,13,16 
5,4,105,31,133,14,96,16 
9,0,32,189,255,169,4 

260 DATA 162,4,160,255,32,1 
86, 255,32,192,255,32,20 
4,255,162,4,32,201,255, 
169 

278 DATA 13,32,210,255,169, 
8,32,189,255,169,6,162, 
4,168,6,32,186, 255,32 

280 DATA 192,255,32,204,255 
1162,6,32,201,255,169,2 
8, 32,210,255, 169,0,32,1 
39 

298 DATA 255,169,5,162,4,16 
@,5,32,186,255,32,192,2 
55,32, 204, 255,162,4,32 

368 DATA 261,255,169,141,32 
+210,255,96,32,204,255, 
162,5,32,201,255,162,0, 
189 

318 DATA 105,21,32,210,255, 
232,224,8,268,245,169,1 
3,32,216,255,32, 204,255 
162 

328 DATA 4,32,201,255,166,1 


@,240,8,169,29,32,210,2 
55,202,208,248,169,254, 
32 





SM 


HC 


Pr 


QR 


PA 


BB 


SF 


BE 


PF 


ss 


ac 


FQ 


DR 


cM 


BH 


RP 


sq 


QR 


336 


340 


358 


368 


370 


380 


398 


400 


416 


420 


438 


449 


450 


460 


470 


480 


490 


508 


516 


520 


530 


540 


558 


568 


578 


580 


DATA 216,255,169,141,32 
216,255,96,230,10,165, 
16,265,120,21,208,13,17 
3,241 

DATA 18,133,16,206,96,2 
1,169,13,32,210,255,96, 
169,0,141,105,21,141,10 
6 


DATA 21,141,107,21,141, 
108,21,141,109,21,141,1 
16,21,141,111,21,141,11 
2,21 

DATA 162,0,160,0,185,97 
+21,61,78,21,240,9,185, 
78,21,29,105,21,157 
DATA 105,21,206,192,8,2 
40,3,76,52,20,232,224,8 
1248,3,76,58,20,96 
DATA 165,3,197,13,208,1 
4,165,4,197,14,208,8,16 
9,15,141,113,21,32,231 
DATA 255,96,169,0,141,1 
13,21,169,8,141,95,21,1 
68,0,177,3,240,3,238 
DATA 95,21,153,97,21,20 
®,192,8,208,241,173,95, 
21,208,17,32,255,19,32 
DATA 54,19,32,86,20,173 
7113,21,208,12,76,112,2 
®,32,22,20,32,198,19 
DATA 76,139,20,96,166,0 
162,6,173,94,21,268,2, 
166,4,177,3,157,97 

DATA 21,200,232,224,4,2 
40,3,76,177,20,173,115, 
21,248,3,76,217,28,168 
DATA 3,185,97,21,74,74, 
74,74,153,97,21,136,48, 
3,76,201,20,160,3 

DATA 185,97,21,45,114,2 
1,153,97,21,136,48,3,76 
2219,28,24,173,97,21 
DATA 109,98,21,109,99,2 
1,109,106,21,240,6,169, 
@,141,95,21,96,169,1 
DATA 141,95,21,96,172,1 
@6,21,185,78,21,141,164 
121,141,1083,21,172,99,2 
1 





DATA 185,78,21,141,162, 
21,141,161,21,172,98,21 
+185,78,21,141,166,21,1 
41 

DATA 99,21,172,97,21,18 
5,78,21,141,98,21,141,9 
7,21,96,173,118,21,133 
DATA 3,173,119,21,133,4 
+169,6,141,94,21,96,128 
164,32,16,8,4,2 

DATA 1,6,3,12,15,48,51, 
60,63,192,195,204,207,2 
40,243, 252,255,192,192 
DATA 192,192,192,56,15, 
1,0,96,0,126,80,169,0,1 
41,99,50,169,1,15 

DATA 82,50,141,86,21,16 
5,169,8,141,113,21,169, 
1,141,96,21,141,94,21 
DATA 165,3,141,118,21,1 
65,4,141,119,21,32,177, 
21,173,94,21,240,6,32 
DATA 54,21,76,134,21,17 
3,113,21,201,50,240,8,1 
69,1,141,94,21,76,134 
DATA 21,32,231,255,96,1 
69,0,141,115,21,32,166, 
20,173,95,21,240,3,76 
DATA 262,21,32,5,21,32, 
22,20,32,198,19,238,10, 
169,1,141,115,21,32 
DATA 166,26,173,95,21,2 
48,3,76,229,21,32,5,21, 
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32,22,28,32,198,19 
PP 598 DATA 32,54,19,32,255,19 
7173,96,21,208,7,238,96 
,21,238,113,21,96,169 
QC 608 DATA 0,141,115,21,76,18 
2,21,68 


Horizons: Raster 
Interrupt 
Article on page 81. 


EH 10 FORJ=491527T049230:READA: 
CK=CK+As POKEJ , AtNEXT 

DM 20 IF CK¢>8670THENPRINT"PLE 
ASE CHECK DATA STATEMENT 
S FOR AN ERROR. " 

GC 30 SYS49152:LIST 

DG 100 DATA120,169,28,141,20,3 
+169,192,141,21,3,169 

HF 116 DATA1,141, 26,208,169, 27 
+141,17,208,169,127,141 

BQ 120 DATA13,226,88,96,169,1, 
141,25, 208,173,18, 208 

AX 130 DATA170,74,74,74,74, 141 
,32,208,74,141,33, 208 

cP 140 DATA201,7,240,9,138,24, 
165,32,141,18, 208, 208 

SP 150 DATA5S,169,16,141,18, 268 
+173,13,220,41,1,248 

KD 160 DATA3,76,49,234,76,188, 
254 





Save Your Copies of COMPUTE! 


Protect your back issues of COMPUTE! 
in durable binders or library cases, 
Each binder or case is custom-made 
in flag-blue binding with embossed 
white lettering. Each holds a year of 
COMPUTEI. Order several and keep 
your issues of COMPUTE! neatly or- 
ganized for quick reference. 
(These binders make great 
gifts, tool) 


Cases: Binders (Please add $2.50 per unit for orders 

$6.95 each; $8.50 each; outside the U.S.) 

3 for $20.00; 3 for $24.75; 

6 for $36.00 6 for $48.00 Send in your prepaid order with the 
attached coupon 


= ee 

Mail to: Jesse Jones Industries. P.O. Box 5120, 
Dept. Code COTE, Philadelphia, PA 19141 

Please send me —________ COMPUTE! _Ocases (binders. 
Enclosed is my check or money order for $ . (U.S, funds 
only.) 
Name 
Address 
City 
State 


Satistaction guaranteed or money refunded 
Please alow 4-6 weeks for delvery. 


























To Our Readers: 


212-887-8525. 


1-800-532-1272. 


Greensboro, NC 27403. 


Part of ABC Consumer Magazines, Inc. 
One of the ABC Publishing Companies 





COMPUTE! Publications is a part of the ABC Consumer Magazines group of ABC 
Publishing, Inc. and recently we consolidated many of our operations and moved 
our Customer Service Department to the New York ABC headquarters. If you 
have any questions regarding back issues, disk orders, book orders, or how to 
place an order, call toll free 1-800-346-6767. New York residents should call 


If you want to order a subscription to COMPUTE!, COMPUTE!’s GAZETTE, COMPUTE!’s 
GAZETTE DISK, or the COMPUTE! DISK, call 1-800-247-5470 or in lowa call 


Our Editorial Offices remain in Greensboro, North Carolina, If you wish to submit an 
article for publication, write us at COMPUTE! Publications, Inc., P.O. Box 5406, 


We thank you for your interest and continued support of COMPUTE! Publications. 


COMPUTE! Pubiications,Inc. 
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January 1984: SpeedScript; Graph 
Plotter; 64 BASIC Aid; Getting 
Started with a Disk Drive, Part 3 


February 1984: Speed Reader; 
Typing Derby; How to Use Arrays; 
Auto Line Numbering; Getting 
Started with a Disk Drive, Part 4 


March 1984: Poker; Guess 
Americal; Sea Route to India; 
Making More Readable Listings; 
Getting Started with a Disk Drive, 
Part 5 


June 1984: 3-D Tic-Tac-Toe; Castle 
Dungeon; Spelling Critter; Shape 
Match; Word Scramble; File Copier 


July 1984: Space Patrol; Robot 
Math; Beginner's Corner; Quilt 
Squares; Home Telecommu- 
nications: Downloading 


August 1984: Campaign Manager; 
Sprite Magic; Sno Cat; Beginner's 


communications: Uploading 





Corner: Using a Printer; Home Tele- 





Issues not listed are not available, 


October 1984; Trek; Quiz Master; 
Vocab Builder; VIC Music Tutor; 
First Aid; Hi-Res Screen Dump 


November 1984: C/G Term; Jump; 
Bagdad; Budgeteer; Function Key; 
Disk Auto Load 


August 1985: Space Dock; Mixing 
Text and Hi-Res Graphics; Crunch; 
Creating Hi-Res Graphics on the 
64; ReDisk; Hi-Res Toolbox 


December 1985: Whirlybird; 
Quickchange; Banners; The 
Construction Set; SpeedCheck: 
Word Processor Spelling Checker; 
Disk File Archiver 


January 1986: Sprint: A Compiler 
for the 64; Face-Off; The Fast 
Assembler; Programming Music and 
Sound on the 128; Disk 
Disassembler; BASIC Windows 


February 1986; Mini-Filer; Kicker; 
Lexitron; Snapshot; Commodore 
128 Memory Map; Disk Editor; Disk 
Commands on the 128 





COMPUTE!s GAZETTE Back Issues 





March 1986: Survivor; Shifter; 
Number Construction Kit; The 
Coordinator; Cataloger; Clavier 64; 
VIC Dump 


April 1986: Turbo Copy; Dunk; All 
About CP/M on the 128; Directory 
Filer; Windows on the 128; Input 
Windows 


May 1986: Arcade Baseball; 
Vampyre Hunter; Klondike; Read- 
A-Tune; Super Synth; Word 
Counter; Double Load; 
Coder/Decoder 


June 1986: Star Dragon; Predictor; 
Switcheroo; Solarpix; Quick Key; 64 
AutoBoot Maker; Help Screens; 
SpeedScript-80 for the 128; 
FontMaker 





Back issues are also available for 
COMPUTE"s Gazette Disk. Each 
Disk back issue costs $12.95 plus 
$1.00 shipping and handling. Call 
COMPUTE!’s Customer Service 
Department for details. 














Back issues of COMPUTE!’s GAZETTE are $6 each. All prices include freight in the U.S, Outside the 
U.S. add $1 per magazine order for surface postage, $4 per magazine for airmail postage. ALL BACK 
ISSUES ARE SUBJECT TO AVAILABILITY. 





In the continental U.S. call 

TOLL FREE 800-346-6767 

(in NY call 212-887-8525 
Or write to: 


COMPUTE!’s GAZETTE Back Issues 


P.O. Box 5038, F.D.R. Station 
New York, NY 10150 











Prepayment required in U.S. Funds. MasterCard, VISA, and American Express accepted, 
North Carolina residents please add 41% sales tax. 
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SUBLOGIC 


WE'VE Got TOP HITS ror AMIGA ein Bi Fr Abo 


BUSINESS EDUC! Whole Brain Spoling 
Texterat iu si Geena ee ee TT ANMEMT "ACCOLADE 


Amiga Pascal © h Grammar |, 1 & i 23 Ballyhoo 2 Hardball 


Dambusters 
Fight Night 

Law of the West 

On Ling PSI5 Trading Company 


Baler doua Staion oS empiats 4 2 ACTIVISION 


Caleratt conierdl Arctic Fox 

Rags to Riches Ledger c : Y Financial Cookbook Conorea tere 

Rags to Riches Payables Seven Cities of Gold 29 | Little Computer People 

Rags to Riches Receivables A actica 4 Deluxe Paint 5 | Fast Tracks 

Rags to Riches Sales C e 49 One On One 9 | Hacke 

EnableWrite c /ontur Deja Vu (Aschaanitha Forgotten Fortress 
Enable'Cal A fing Adventure It & IN ; Halley Projoct Groat Am. Cross Country 
Enable/Filo 1d Thinking |, 1 & Ui $ Rood 


Aegis Draw # sel 
scribble dons in Reading & Reasoning... .§ ri Countdown to Shutdown 
Sizmoz 


Lesa cane Be Ae Animation Countdown 
World Geography Adventure rataccas % lind Shadow 
Ne pect Gay ee eae doth ose Pre Mind Shod 
eee § ler Bee Temple of Apcha cho 
VIP Professional Remar homes 23 | The Music Studio 
Come Maker 
WE CARRY A COMPLETE LINE OF SOFTWARE. Computer Freworks Coishration Kit 
THE FOLLOWING IS JUST A SAMPLE OF OUR PRODUCTS. DAVIDSON & ASSOCIATES |The Desianers Penal 
Math Bla: $4 TOP HITS 
ELECTRONIC ARTS Spelt $4 Gorenip cence 
yenesof God Operation Morket 3 MICROPROSE Hence 
hdr, Constucton Bet puter Quarterback ike Eagle Cpa ei 
Archon $ B: a mn 2 Mr. Nibble & MSD Version 
Finnclol Cookbook $28 Gemstone Wrior 2 do In Europe Sore 
One On One ; Slot Korateka 
Murder/Zindomeut tune te ona Sargon il 
Sky Fo Ee a nah et ia Vietnam 327 Cont C126 
Heat ot atta 23 Ouest MASTERTRONIC Sango 
Otima IV 4 1905 The Day Ate 
pe ; ; 
Bor 
eseaol Conch 


Music Studio 
Borrowed 


INFOCOM stags ne Captive $ hop Companion 
y ; : Board Gol 
Tournamont Disk For Above) 


GAMESTAR sith Oe 4795. Snapshot 


Enchantor 
Hitchhiker's Guide to the Galaxy 
Sorcerer 
Oth Frame 
Geos 
Kung Fu il 
; Bit 
ABACUS ‘ 195 conmetaieeoe 
ES 7 Commodore 2 


$ ; $9.00 

Koronis Ritt saree ; & Le $5.00 

Temple of Apshai Trilogy 7 7 4 Votes Je 878 $6.00 

Fast Load (R) a Be N sa : ° $6.00 

Microsoft Multiplan $ cel Aled “ a hapa s $2.50 
HARDWARE I tu . 4 The 9 nt $3.50 

1670 Modem A z ; TOP QUALITY BULK DISKS 

C128 Com; A Mind Con 795 100 Quality DSOD ea, 69° 

1571 Disk Dri Sup e100 jen Talis y SSDD. ea, 59° 

1872 Dual Dr I 5 an 100 — DSDD ea, 79° 

1802 Moaiter A A Side Socce 9 s Than 100 — SSDD e 

MPS 1000 Printor C ps E 

Vic 136 3 WE CARRY A FULL LINE OF PANASONIC, STAR, EPSON, 

VIC 1700 128K Expander 28 OKIDATA AND LEGEND PRINTERS. CALL FOR CURRENT PRICES. i 


ALL TITLES ON DISK UNLESS MARKED (R) FOR ROM CARTRIDGE 
Order Line WE CHECK FOR STOLEN VISA & MASTERCARD Customer Service 


1-800-282-0333 & 0) Residents 
ORDERS ONLY! Sales Personnel Do Ret Ola-. Sip. Sats Er 1-513-879-9699 


Not Have Information on i 37 S. Broad Street, Fairborn, OH 45324 


Previous Orders or Product Spec: 


SOFTWARE ONLY — Prepaid orders over 950 receive free shipping via UPS in continental U.S. Please add $2 orders under $50. HARDWARE and all 
orders requiring shipment via U.S. Post Office are subject to additional freight charges. Add 95 for COD orders. VISA/MasterCard orders add #2 servi 
charge. Ohio residents add 5.5% sales tax. Personal checks require a three-week waiting period. No waiting when paid by credit card, certified check 
‘or money order. All tems subject to availability and price change. PLEASE CITE AD NUMBER WHEN ORDERING, ALL RETURNS MUST BE ACCOM- 
PANIED BY AN AUTHORIZATION NUMBER. 








THE COMMODORE CONNECTION 


commodore 64 


System 
INCLUDES: 

© CB64 Computer 

* CB1541 Disk Drive 

* Taxan 220 Color Monitor 


$49900 


ATARISOFT/Commodore 
PacMan. 
Centipede. 
Galaxian.. 
Dotender 
Dig Dug ht 
Donkey Kong 


Robotron. 4 
BATTERIES INCLUDED 
Paperclip 64/128... $3 
Paperclip/Spell Pak. 
Spell Pak. 
The Consultant. 
HomePak : 
BRODERBUND 
The Print Shop... 
Graphics Library 1,2,3 ea... 
The Music Shop. 
Bank Street Writer... 
Graphics Companion, shies 
CARDCO 
Freeze Frame.......... yeannwenes 
S'more Basic. 


MODEMS 


Anchor Volksmodem. 


DRIVES 
CBM1541..... $19900 
CBM1571 .§24900 

.$21900 
845900 


INDUS. GT (64/128)....$1990° 


\/AMIGA System 
Includes: 


AMIGA 1000 CPU, 512k, 
Amiga RGB Monitor 


$139900 


SOFTWARE 


COMMODORE 
Jane-integrated 
Assembler 64. 
Pliot 64. 
Super Expander. 

DATA SOFT 
Moon Shuttle. “ 
Pooyan, 


O'Riley's Mine, Sor 
DISCOVERY 
Marauder Amiga B/U. 
HES 
Omniwriter. 
Benji Space Rescue. 
HES Games/Olympics. 
Graphics Basic.. 
MEGASOFT for Amiga 
A-CopiIer. coon. 
A-Report 
Text Craft... 
Graphic Cratt 


PRINTERS 
COMREX CR-220.... 
EPSON Homewriter 10 
OKIDATA Okimate 10 
STAR SL10C......0 
PANASONIC 1 
C.ITOH 7500 AP....... 


++ 88909 
$15900 


CARDCO G-WHiZ. 
CARDCO Super G...... oe 
Digital Devices U-Print C 
Orange Micro Grappler Ci 
PPI Printer Interface. 

Xetec 8K. 

Micro R & D MJ3: $59) 
ACCESSORIES 
CompuGuard Protector. $1499 
Curtis SP2 Protector, $3999 
Curtis Safety Strip 81999 
Computer Specialties Power Plust5400 


commodore 128 


System 
INCLUDES: 
© CB128 Computer 
¢ CB1571 Disk Drive 
* Magnavox 8562 RGB/ 
Composite Monitor 


MICRO SYSTEMS 
Analyze for Amiga. 
Scribble 
On-Line. 
Professional Software 

Fleet Systems Il C128/64 
Fleet Systems Ill C128 
Trivia Fever......... 

PFS 


SPRINGBOARD 
The News Room. 
Clip Arts. 
Clip Arts Ii 


File 


SUBLOGIC 

Flight Simulator I 

Jet Simulator C64 ee 
SPINNAKER 

Rhymes & Riddles... 

Alf Cocor Caves. 

Bubble Burst... 

Snooper Trooper's #1 


MONITORS 
COLOR/COMPOSITE 
Taxan 220..........817900 
MONOCHROME 
NEC 1205 Amber 
with audio 


DISKETTES 
MAXELL MD1.... t 


GENERIC DS/DD wren n File 
10 Disk Holder. te 


Disk Tub: 


COMPUTER MAIL ORDER 


CALL TOLL-FREE 1-800-233-8950 


477 East Third Street, Dept. A408,Williamsport, PA 17701 
EDUCATIONAL INSEELOTIONS CALL TOLL-FREE 1-800-221 pete 


POLICY: Acc 396 (Minimum $7 00) 


[aeacon] use you ret ead or send 
Det 


1-800-268-3974 


Ontaro/Quebec 


ORDERS 


Telex:06-218960 
2505 Ounwin Drive, 
Mississauga, Ontario 

Canada LSLiT1 


1-416-828-0866 





ATTENTION 


ALL COMMODORE 64, 
VIC 20, COMM. 16 AND 
COMMODORE 128 owners 


Accomplete self-tutoring BASIC programming course 
is now available. This course starts with turning 
your computer on, to programming just about 
anything you want! This course is currently used 
in both High School and Adult Evening Education 
classes and has also formed the basis of teacher 
literacy programs. Written by a teacher, who after 
having taught the course several times, has put 
together one of the finest programming courses 
available today. This complete 13 lesson course 
of over 220 pages is now available for the COM- 
MODORE 64, VIC 20, COMMODORE 16 and the 
COMMODORE 128 and takes youstep by step thru 
a discovery approach to programming and you 
can do it all in your leisure time! The lessons are fil- 
led with examples and easy to understand explanat- 
ions as well as many programs for you to make up. 
At the end of each lesson is a test of the information 
presented. Furthermore, ALL answers are supplied 
to all the questions and programs, including the 
answers to the tests. Follow this course step by 
step, lesson by lesson, and turn yourself into a 
real programmer! You won't be disappointed! 
We will send this COMPLETE course to you at 
once for just $19.95 plus $3.00 for shipping and 
handling (U.S. residents, please pay in U.S. funds). 
If you are not COMPLETELY satisfied, then simply 
return the course within 10 days of receipt for a 
FULL refund. 
FOLLOW UP 
COURSE 


Now available! a 200 page course 
exclusively on sequential and rel- 


ative files using a unique approach 
for those with very limited file programming ex- 
perience - set up your own personal and business 
records! — disk drive a must — same author — 
same guarantee — same cost— this course for 
all computers except Vic 20. 

Fill in the coupon or send a facsimile 





NAME: 
ADDRESS: 

CITY: 
PROV./STATE: 


ROS TAU ZI CO) aan 

| I desire the BASIC program. Any complete course: $19.95 
ming course for: Postage and Handling: $3.00 
Commodore 64 () Vic 20) Total: $22.95 
Comm. 128 (1 Comm. 16 (1 Send Cheque or Money Order to: 
| desire the FOLLOW-UP [ Brantford Educational Services 
course on relative and seq- 6 Pioneer Place, 

uential files for all above Brantford, Ontario, 
computers but Vic 20). Canada N3R 7G7 

























PERSONAL 
COMPUTER 


CALL 





DISK DRIVE 
$229 








1902 MONITOR 





$159 


$289 


el 


CALL FOR SUPER PACKAGE PRICES 


1350 MOUSE 
ONLY $4295 


Sn ae KEY 


Comput efAbility. 


PO. BOX 17882 ORDER LINES OPEN 
MILWAUKEE. Wl 89217 MON - FRL AT AM. = 7 PM. CST 
SAL12PM.-5 PM CST 
FOR TECHNICAL INFORMATION, 
ORDER INQUIRIES, OR FOR WIS. ORDERS: 


_ 414-351-2007 


HIER'S CHECK MONEY OF 





_—— 


























TO OADER CALL TOLL FREE 


800-558-0003 


ORDERING INFORMATION FOR 















S PLEASE ADI 
AN ORDERS PLEASE ADD 
ALL OTHER FOREIGN ORDERS 





A, RETUN AUTHORIZNNON NUMBER PLEASE 
10 ie OR YOUR RETURN, WILL NOT. BE ACCEPTED 
(OW REPAIR. PRICES AND AVAILABILITY SUBJECT TO CHANGE 


AS OUTSIDE CONTINENTAL USA. WE si 
LIF SEES ct EXCEED THE ae eat 0 
CHARGEDTHE ADDITIONAL AMOUNT TO. | 

1 youn PACKAGE TO YOU WUICKLY AND SAFELY. — 


NO SURCHARGE ON CREDIT CARDS en 


























Stair fore) e)ece) =| a -y @- a Pt: MONITORS 


ee) ~NEW axioprnter & aes 
Eee] © XETEC SUPER GRAPHIC INTERFACE 





PRINTERS 


Legend 1080 ... 


Epson... 

Juki 5510 
Toshiba 1340 . 
Legend 808 . 
Panasonic 1091 . 
Powertype . 
Panasonic 1080 


-209 
Call 
389 
Call 
- 169 
239 
309 
215 





PRINTER BUFFERS $309 : 
MERE Thisisa SHIPPED PRICE anywherein continental USA [RameoaneaRp ed 
PAINTER INTERFACES PANASONIC 1091 & 

= ETE SUPER GRAF TENCE | 
: This isa SHIPPED PRICE anywhere in continental USA sere 





COMMODORE 64 


SOFTWARE 
ABACUS 64 


Chartpak 


Tourname 
ACTIVISION 


Gamamaker 


Ae 

BATTERIES 

INCLUDED 
‘ 


Home Org 
81-80 Card 


BRODERBUND 


C-128 COMPUTER 
1571 DISK DRIVE COMMODORE 128 
1670 MODEM SOFTWARE 
1902A RGB MONITOR Br Pa 
1750 RAM EXPANDER 
1350 MOUSE 
Call for 
Commodore 64 
1541 Disk Drive 
1802 Monitor 


Data Manager Il... x Inventory 
Wordwriter/Spell .. 31.95 Accounts Payable i Management ... 37.95 
Swiftcalc/ Accounts Rec. 95 Data Manager-128 . . 42.95 
Sideways . 31.95 Sales Analysis. Wordwriter-128... 42.95 
Evelyn Wood . 31.95 Payroll Swiftcalc-128 .... 42.95 
Sideways 1895 Management... 37: Sylvia Porter-128 . . 42.95 


*SUPER SPECIAL PRICES EFFECTIVE NOW THRU AUGUST 31, 1986 


MINOSCAPE 


——— sr. 1982- 


Compuecbility 


To Order Call Toll Free 


800-558-0003 


For Technical Info, Order 
Inquiries, or for Wisc. Orders 


41 Ex Els 2007 


Coo ehrger ae s300 Inc 


TIMEWORKS 




















COMPUTER CENTERS 


OFAVERCA Sizzling Summer Specials 
On All Your Computer Needs 


IN NEW YORK STATE CALL TOLL FREE 4 _. 2 
1-800-221-2760 or 516-349-1020 1 800-631 1003 
__OR WRITE: COMPUTER CENTERS OF AMERICA, 81 TERMINAL DRIVE, PLAINVIEW, NY 11803 










SP-1000 . 


© Buitén Commodore Interface 


189° / 
INCLUDES DELIVERY, sEKOSHA == 


LUMITED TIME ONLY 
SPECIAL INTRODUCTORY PRICE 


PRINTER SPECIALS 













——— 
Ckcommaodore 64E PACKAGE 


“Commodore 64 Computer 
*Commodore 1541 Disc Drive 





* A Color Monitor with Cables '< commodore MCCA 
eae es 1571 DISC DRIVE STAR POWER TYPE 
14” COLOR RGB MONITOR $249 95 sLetter Quality #18 CPS °13" Carriage 


BAN 
i pe 
*including: Shipping, Handling and ge $ 2 59 95 


Insurance—No Extra Charges 


GEMINI STAR 10X 
—S wow! $439 


z = ERY. 
ne SAS spl 


SPECIAL INTRODUCTORY PRICE 





















= commodore = 
128 “Goldstar 
PERSONAL COMPUTER 13” COLOR COMPOSITE 


CALL FOR $25995 acne 

PRICE *Including: 0S Handling and $ 1 2495 
Insurance—No Extra Charges 

$24.95 Paperback Writer 128 

eicupes [I SUIMMER SPECIAL NE 
PACKAGE epee 












































Kronis Rift - Lucas Games Temple of Asphai 

Eidolon - Lucas Games __Thilogy Planner 128 
Baliblazer - Lucas Games Jet Combat YOUR CHOICE 
Rescue Fracalus Lucas Simulator * Commodore 128 

canes S Joe 2 © Commodore 1571 Re $299 
astload summer Games 1 oF I 5 

Wintergames * RGB/Composite for the Commodore 128 
Hot Wheels * Color Monitor 

















\ INTERFACES | 


Teleys Turbopoint GT 

Prints Enhanced 

Graphs ...- 2... 8599S 

Cardco G +. Call for Price 

Microworld . .Call for Price 
$4495 





We Carry ALL 
Commodore Software s 72 g95 
Fleet System Il @ INCLUDES 
$5995 DELIVERY 
Fleet System Ill 


56495 


Check, Money Order, MC or VISA accepted. No 
additional charge for MasterCard and Visa. Calll for IN NEW YORK STATE CALL TOLL FREE 


shipping and handling Information | NYS residents 1-800-221-2760 or 516-349-1020 
ota a msg any ae COMPUTE hee, 
subject to change without notice / All factory fresh a 81 TERMINAL DRIVE, PLAINVIEW, NY 11803 
merchandise with manufacturer's warranty, Dealers COMPUTER CENTERS 1 800-6 31 1 003 
Welcome. Call for recent price reductions and new OF AMERICA = = 
rebate Information, Plus shi and handling. No 

HE A GUCTERE aR eta EEE 81 TERMINAL DRIVE 4-800-548-0009 
[_*IN CONTINENTAL USA ONLY. APO PLUS FPO EXTRA. PLAINVIEW, NY 11803 











Xeléc - Super Graphics Sr Sos 
Xelec -Super Graphs Jt 54975 





























A Printer For 
All Reasons 


Search For The Best 
High Quality Graphic Printer 


The Results Are In We ran many printers through 
our battery of tests and this one came out first in its 
class. Our SP-1000, built by Seiko is a 100 characters 
per second, (12 horizontal by 9 vertical matrix), full bi- 
directional, logic seeking, true descender printer. The 
character matrix in NLQ (Near Letter Quality) mode is 
avery dense 24 (horizontal) by 18 (vertical) 


Features That Won't Quit With the SP-1000 your 
computer can now print 40, 48, 68, 80, 96, or 136 
characters per line. You can print in scores of style 
variations, You not only have standard Pica, Elite, 
Condensed and Italics, but also true Superscripts and 
Subscripts. Use bold, or italics to make the words 
stand out. Or, if you wish to be even more emphatic, 
underline the words. You can combine many modes 
and styles to make the variation almost endless. 


Forms? Yes! Your Letterhead? Of Course! 

The tractors are adjustable from 4 to 10 inches. You 
can also use single sheets, plain typing paper, your 
letterhead, short memo forms, labels, whatever you 
choose. Any size to 10” in width. It will even load your 
paper automatically. Multiple copies? Absolutely! Use 
forms up to 3 thick. Spread sheets with many 
columns? Just go to condensed mode printing and 
print a full 136 columns wide all on a standard 8%" 
wide page. Forget expensive wide-carriage printers 
and having to change to wide carriage paper. 


An Extra Long Life (2.5 million character) ribbon 
cartridge is only $11.00, Order #2001, You need 
absolutely nothing else to start printing—just add 
paper (single sheet or fanfold tractor) 


No Risk Offer We give 

you a 2-week satisfaction } 
guarantee. If you are / 
not completely 
satisfied for any 
reason we 

will promptly 
refund your 
purchase. 





The warranty has now been extended to 2 years and 
service centers are located nationwide for your 
convenience. 


The Bottom Line: 


Commodore C-64 & C-128, Order #2200. graphics 
interface & cable built in. $199.95 

IBM-PC and compatibles, Order #2100, $219.95 
plus 8' shielded cable #1103, $16.95 

Apple lic or Macintosh, Order #2300, $219.95 
with cable, specify computer 

Standard Parallel with 36 pin Centronics connector, 
Order #2400, $219.95 no cable 

Standard Serial with RS-232 (DB-25) Connector. 
Order #2500, $219.95 no cable 

Be sure to specify the order # fer the correct version 

printer designed for your computer. 

Interfaces and cables for other computers. 

Call 805/987-2454 for details. 


Shipping in cont. US is $10.00. UPS Blue is $22.00. 











Letter Perfect 


Now! Full Feature, 20 CPS, 
Letter Quality Printer only $319.95 


For those who need a Daisy Wheel Printer, our 
Daisy 1120 has itall. To start with, it has a front 
control panel with indicators for Pitch Selection which 
allows for 10, 12 or 15 pitch or Proportional Space print- 
wheels. There is a Select (Online) button with indicator 
and a Line Feed button. You can also set Top-of-Form 
or Form Feed with the touch of a button. Other indi- 
cators include Power and Alarm. The built in 2K buffer 
allows a page or two of concurrent printing and use of 
your computer for the next job. To really take advan- 
tage of your printer's optional features, the automatic 
Cut Sheet Feeder elimi- 


nates tiresome single _ _ 
page handling RN 
and the adjust b e 





able Tractor \ 
Feed option . 


handles all con- - 
tinuous form paper. 

Best of allthe Daisy \ 

1120 is quiet: only 58 dB. 


Total Compatibility The Daisy 1120 uses 96 
character Diablo” compatible printwheels. At 15 
pitch you can print 165 columns—a must for 
spreadsheets 

The Daisy 1120 uses the Diablo Hytype II" 
standard ribbon cartridges, also universally available 

Not only is the hardware completely compatible, 
the control codes recognized by the Daisy 1120 are 
Diablo 630° compatible (industry standard). You can 
take advantage of all the great features of your word 
processing package and automatically use 
superscripts, subscripts, automatic underlining, 
boldface and doublestrike 

The printer has a set of rear switches which allow 
the use of standard ASCII as well as foreign character 
printwheels. Page length can be set to 8, 11, 12, or 
15". The Daisy 1120 can also be switched to add 
automatic line feed. 

Try the Daisy 1120 for 2 weeks. If you are not 
satisfied we will issue a prompt refund. 1-year parts 
and labor warranty is included 


The Bottom Line Aprotek Daisy 1120 (Order 
#1120) $319.95 w/standard Centronics parallel 
interface, 2K buffer, ribbon and printwheel 


Options: Compare our prices! 

Auto Cut Sheet Feeder (#1110) $185. Shipping $7 
Bidirectional Tractor Feed (#1112) $75. Shipping $5. 
Interfaces for most computers are available—call 
Shipping in cont. US is $11. UPS Blue is $24 


ORDERING INFORMATION California residents add 
6% tax. All prices are cash prices — VISA and MC add 3% to 
total. We ship the next business day on money orders, 
cashier's checks, and charge cards. A 14-day clearing 
period is required for checks. Prices subject to change— 
CALL Dealer inquiries invited 


For information call 805/987-2454 
TO ORDER CALL TOLL FREE 


1 (800) 962-5800 - USA 
1 (800) 962-3800 - Calif. 


Or send order to: 


(8-8 PST) 





= APROKRK...... 


1071-A Avenida Acaso, Camarillo, CA 93010 








COMMODORE * ATTARI * |BM * APPLE 
MONITORS MODEMS 


PRINTER NIRS oe 


WARRANTED ow ots wate 


ie wow! RETAIL $299.00 
\ $88" sd 513 $139° 
FREE TRIAL PERIOD) COMREX CR20-A 


DISK DRIVES PLUS/4 


NEAR LETTER QUALITY 





com MODORE 
COM 
COMMODORE 


—_ $149 |: 


eee 
T-IN 


FREE TRIAL PERIOD 


=PR RO-TECH-TRONICS_ 


6870 Shingle Creek Parkway #103 © Minneapolis, MN 55430 ¢ (612) 560-6603 


CALL TODAY —NEXT-DAY DELIVERY*- SCHOOL P.O.'s Accepted! 


1-800-345-5080 








First, Fast... 
and Still the Best! 


We're the first company to offer fast, expert Commodore 
service anywhere in the USA. And we're still the best! 


For one low price, we repair all problems on most types of Commodore 
equipment. All regular repairs carry a 30-day warranty, with a full-year warranty 
available for only $30 more. For preventive maintenance, we also offer a 1-Year 
service Contract at a savings of $20.00. Check our low prices! 

Repair with Repair with 1-Year 

30-day Warranty 1-Year Warranty Service Contract 

C-64 or C-128 Computer $59 $89 $69 
1541 or 1571 Drive 65 95 75 
1702, 1802 or 1902 Monitor 75 105 85 
MPS-801, 802, 1525 or 1526 59 89 69 
1541 or 1571 alignment (only) Just $29.95 
And as an extra benefit — our repair customers are eligible for big discounts on software and 
hardware purchases. 


FREE PERMANENT FIX 


A $69.95 value — includes alignment and modification to stay in 
alignment. FREE for a limited time with any 1541 repair! 








We also offer the best rates for Amiga repairs. 


For fast, expert service... 
Just call our toll free number today! 


1-800-624-6794 


(For your convenience, have your equipment serial number and credit number ready. 
Checks and money orders also accepted). Add $7.50 for shipping — includes two-day air 
service anywhere in the Continental USA. For APO-FPO and P.O. Box addresses, add 
$15.00 for shipping (excluding air freight). 


TRIAD s 
COMPUTERS 


3402-E W. Wendover Ave., Greensboro, NC 27407 
1-800-624-6794 or (919) 299-0391 





4 _A Complete Pro Football 
» Prediction Program For The 
* 1986 NFL SEASON 


6 1 % Accurate vs ‘Spread’ Since 1981 
0 ++ More Features — More Information In 1986To........ 
BEAT THE SPREAD 
+ FEATURES + «B95 "UPS cut 


i Apple Il — llc — lle 
Predicted Scores Each Week Commodore 64 = 128 


Season Schedule By Week/Team IBM PC, Tandy & Compatibles 
Records & Results: gas SONUUN 


Scores By Week Stats Needed To Run Program 


Scores By Team Available In Local Newspapers 

Win ft Or 
Division Standings We Will Furnish Stats By Mail Or Modem 
Standings vs Line All 20 Weeks — Season Price . . . 40° 


Stats — Accumulated & Average Program Comes Updated Thru Current 
1983-1985 Data Base Week Of Season . . . No Extra Charge 


7A (o}sreevncnt las ORDERS SHIPPEDIIN 2 DAYS 
Printed Copy All Screens PHONE LINES OPEN 24 HRS. 


se TOLL FREE — 800-722-2277 
Sy) Usk ERE Y, TEXAS COLL. — 214-586-8212 
Dealer Inquiries Invited 


MaratHon Sortware Dept. G 
P. 0. BOX 1349 
_—— JACKSONVILLE, TEXAS 75766 
TOLL FREE & COLLECT FOR ORDERS ONLY 








PHONE 
™oaces, service ~=©6 ELECTRONIC ONE* OBEN NEES 
CALL (614) 864-9994 © P.O. Box 13428 * COLUMBUS, OHIO 43213 


‘COMMODORE ¢ SOFTWARE SPECIALS 
HARDWARE «commodore SARGON III 2997 BREAK DANCE 
ciesconpuren aay eran See aE BASEBAIL ana? 9 SMONBeRSIC 
C64 COMPUTER 199.97 (j=ees HACKER 1697 ALF COLOR CAVES 
fen DRONE haa? BENT aeRVicE ee funnuntor iano 
Te OERERVE ee <=) Aan ‘oa? STORY MACHINE 
TREMOR ay SOFTWARE Fees cue 1037 Heseueure 
{ocd MONITOR Teey UNG FUERMCOUC TET. ...1407 | PARERCUPBPELLPACR viaea?  JOKEGOX 
Ree MONTOR irOR csc. dopey MUNGEUSTICRUOFDEATH 1487 _LENBENBGARD $35) BELTADAMWNG 
ee na PRINTER Seer KARATE CHAMP PMR TE Cn peOeLE Gaal asimov [Pace Kane 
1350 MOUSE 2387 RONGFUMASTER TBs ummetCER GOCotOAy atic: ts anasm UR FoR Gabe 
Stale ar MUeIC Sno Be Pirall 
BIO STAR EC ea 31007 HARDBALL 18.97 ‘ONE ON ONE 2497 CONGO BONGO 
SG10C-STAR 229.97 PSITRADING CO, 1897 SKY FOX 24.97 SNOOPER TROOPS NO. 1 
STARNX 10 239.97 DAM BUSTERS pels TOUCHDOWN FOOTBALL 19.97 BNO ERABOOrS NO. 2 
CW OFTHE WEST ; are We, Stkhon 
PANASONIC 1080 Caer ‘er Ge Banna ee REAEAN VOYAGE 
paces call aor Arena mer UR AO 
Hees : ser i GARB TAL te Weasten nono o 
SEKOSHA 907 Er SULATOR, 1... 200F a sheet) 
SMore pr HA er wer MBBING Lins (0) 
MISC. HARDWARE FAST LOAD c2g7n Mleryaeats pa TURTLE TOYLAND JR, 
WIZ INTERFACE 4697 MACKS 2297 Ce pea eae SNAKE MAN 
CAROCO-GINTERFACE 97.97 Mach 128 2357 a 807 JAWBREAKER I 
TYMAC INTERFACE 40.97 SUPER PASCAL 44.97 iS DIG DUG 
PPIINTERFACE 2207 RowePac #87 GENTECHCOVENSISDID......897 RR ry 
XETECIR soar MERC ouraNT ..iser  OSKNOTEHER 297 RID RUNNER 
XETEC SA. (8k) $9.97 SYLVIA PORTER 54.97 GRID RUNNER I 
TOTALCCAME MODEM. ccccenar — SYUVIAPORT a7 * “JOvsTICNS SAA 
COUMGewpaANOMCDEK | iaaay — TEINTSHOR, 2197 sae aoss yer GREAT 


MESSENGER MODEM 9207 PRINT SHOPGOMPANION 22.07 THEBAT 1697 SUM MAN 
, PANTSHOPGRAPH LIB)... 497 y 
VA" THOMPSONCOLOR.....1a07 _-PRINTSHOP GAAP Mate ker 797 ALL QUALITIS ARE LIMITED 
te" Wee 1225 COLOR fae) Apa warans {407 SPECTROVIDEO | ist ALL ARE DISK OR CART 
{5° SAKATACOLOR 13097 SPECTRO VIDEO? 17 


HOW TO ORDER: CASHIER CHECK. MONEY ORDER, MASTERCARD” OR VISA" (ADD 4% FOR CHARGE CARDS)... NO PERSONAL CHECKS... NO.C.0.0.'s 
SHIPPEO U.P.S. ... ALL PRICES SUBJECT TO CHANGE WITHOUT NOTICE 
SHIPPING: ADD $3.00 ON ALL ORDERS UNDER $100.00 . . . ADD $5.00 ON ALL ORDERS OVER $100.00. ACTUAL FREIGHT CHARGED ON MULTIPLE ORDERS, 
INTERNATIONAL: ACTUAL FREIGHT CHARGED ON ALL ORDERS OUTSIDE THE CONTINENTAL UNITED STATES INCLUDING A.P.O. 
POLICIES: NO RETURNS WITHOUT A RETURN AUTHORIZATION... NO RETURNS UNLESS DEFECTIVE. ALL DEFECTIVES WILL BE EXCHANGED. . NO 
EXCEPTIONS 

CALL OR WRITE FOR FREE CATALOG 


CALL ELECTRONIC ONE (614) 864-9994 





Sensational Prices! 
On Our Most Popular Items! 


From micro far” 


THE 69C piskeTTE! 


‘Are you paying too much for diskettes? Try our first 
quality, prime, 5%" diskettes (no rejects, no seconds) 
at these fantastic sale prices and save, save, SAVE! 
Disks are packaged in boxes of 50; each box contains 
§ shrinkwrapped 10-packs that include diskettes in 
sleeves, labels, and write-protect tabs, 


Each diskette is certified to be 100% error free and 
comes with a lifetime warranty (if you have a problem, 
welll replace the diskette). All diskettes include hub rein- 
forcement rings and write-protect notch. 


All diskettes are double density and work in either 
single or double density drives. 


SS, DD Diskettes, Box of 50 
92391 $34.50-69¢ ea.1 


DS, DD Diskettes, Box of 50 
32403, $44,50-ag¢ ea.! 


POWER and PROTECTION 
FOR YOUR C-64! 


POW’R PAK 64 *> 22 


Pow't Pak is a replacement power supply (1.5 amp) 
for the Commodore 64. . . but that’s not all! Pow'r Pak 
also supplies two additional surge protected outlets 
(120V) for monitor, disk drive, or other peripherals. 
Oni/off switch. Fuse protection. Sturdy all-metal cas- 
ing is ventilated for heat dissipation. Full 1 year 
warranty. 


34910 $49.95 


CARTRIDGE EXPANDER 


Plus 822.95 
FAST LOAD 
OFFER! 


Stop wearing out your computer by endiess cartridge swapping! 
The Navarone cartridge expander features 3 cartridge slots. Reset 
tho computer independently of the power switch. Cartidge slots 
‘ae vertical for easy access — no blind fumbling behind the 
computer. 

33227 3-slot Cartridge Expander $22.95 


The canridge expander isa great companion for the Epyx Fast Load 
cartridge —you can keep I permanenty installed plus have two 
sides free for other cartndgest 
34216 Fast Load Cartridge (Sug. Retail $2995) $24.95 
Fast Load Only $22.95 
with purchase of cartridge expander! 


We gladly accept 
mail orders! 


P.O. Box 6578 


From Your Friends At 


South Bend, IN 46660 


Questions? Call 
219/259-7051 


LOWEST PRICES IN U.S.A.! 
St@iz BMC AXIOM INDUS 
SOHC EPSON CARDCO 

We can offer you some of the lowest prices in the country on the most popular printers, mon- 
itors and interfaces. Our normal prices are already low, but to make sure you get the best deal 
you can, we will also meet most competitive prices in this publication when placed an an equal 
basis (Remember—-we don't charge for use of your credit card, impose excessive shipping fees, 
cr use any other hidden extras to boost the price you pay. Due 10 the rapid change in prices in 
the computer industry, we can only meet prices at the time you place your order; we cannot adjust 
prices on items ordered or shipped on an earlier date.) Another plus for charge card customers 


— your charge card is billed at time of shipment only for the items shipped — no early billing, 
no long wait for the merchandise you already paid for 


COMMODORE STAR MICRONICS FAMOUS NAME SOFTWARE 
C128 Computer $CALL_NX:10 SCALL — Epyx 
1571 Disk Drive $CALL_«_-SG-10C SCALL Broderbund 
1902 Monitor SCALL CARDCO Infocom 
1670 Modem SCALL “G.Wiz Interface. SCALL_—sSierra 

EPSON S'MORE SCALL —_Timeworks. 
FX85 SCALL — Super-G SCALL 
FX286 SCALL 


Random House 
Activision, and many more! 





COMMODORE. READY PRINTER Y 
+ THE BEST PRICES + , ONLY $7995! 


+ THE BEST SERVICE x 
WHY SHOP Frat $4905 
ANYWHERE ELSE? 40733 


Supply limited! Order now! 





80-COLUMNS ON YOUR oi BEST MONITOR VACUE EVER! 
COMPOSITE MONITOR! 


Switch Selectable 


itand sh 
on parts and labor, 2 yeas 
msung. Supply Linvted! Order Today! 
40728 $149.95, 
Monitor Cable (required), Works with C64, C128 (in 
composite mode), TI 99/4A and many others 


a7aza $7.95 


DUST COVER and The Right Interface For All 
“EVERYTHING BOOK” inti fl 
SPECIAL OFFER your BUD (ES) for your 


Gt br ny ide te ore re BUN ee 
cover for your C-64 or C-128 and our catalog, ar 0SI tor 
Tie Bethea Senko eee Es 

Hote Corpues ease ea sa 

Hogendherang capes Corie tent era 

Peatsee menace ceed 

ake pe AG dl Elec] 

Sangean any ong sete re 

ca eaay sens 


‘© $2.95 


31627 C-64 Dust Cover and Catalog (G1S) 
38464 C-128 Dust Cover and Catalog (GIS) 


Interface ;" 


SHIPPING CHARGES 
ORDER AMOUNT CHARGE 
fess than $20.00 $3.75 
$20.00-$39.99 4.75 
$40.00-$74.99 5.75 
$75.00-$149.99 6.75 
$150.00-$299,99 7.75 
$300 & up 8.75 


NO EXTRA FEE FOR CHARGES 


WE VERIFY CHARGE CARD 
‘ADDRESSES. 


ORDER TOLL FREE 
1-800-348-2778 














Pigskin 
Predictions! 


Tired of wrestling with Sunday 
point spreads? Let your Com- 
modore 64/128 do it for you! 
Pigskin Predictions, the 
best-selling NFL handicapper, 
takes the hassle out of rating 
National Football League 
games. Forget about obscure, 
meaningless statistics. Just 
spend a few minutes typing in 
each week's scores and let our 
point spread software go to 
work. Here's what Pigskin Predictions has to offer: 

™@ Predicts point spreads for all games--for the current 
week and the remainder of the season 

@ Calculates projected won-lost records for all weeks 

1 Menu-driven selection of schedules, ratings, division 
races, predictions or results by team or week. Seven differ- 
ent reports to screen or printer! 

@ Maintains home field advantage and power ratings for 
all NFL teams. 

@ 1986 Schedule data file included free. Yearly updates 
available. 

Pigskin Predictions is only $39.95 on disk. Get your copy 
now and be ready for the season! 





GUA Wil 


The Handicapper 





Use your Commodore 64/128 to improve your per- 
formance at the track! Programs for Thoroughbred, 
Harness and Greyhound racing rank the horses or 
dogs in each race quickly and easily. All the information 
is readily available from the Racing Form, harness or 
dog track program. 

Thoroughbred factors include speed, distance, past 
performance, weight, class, jockey’s record, beaten fa- 
vorite and post position. Harness factors include 
speed, post position, driver's record, breaking tenden- 
cies, class, parked-out signs and beaten favorite. Grey- 
hound factors include speed, past performance, ma- 
neuvering ability, favorite box, class, kennel record, 
beaten favorite and breaking ability. 

Complete instructions and wagering guide included. 
Thoroughbred, Harness or Greyhound Handicappers, 
$39.95 each on tape or disk. Any two for $59.95 or all 
three for $79.95. 


Federal Hill Software 
8134 Scotts Level Rd. (Se! 
Baltimore, MD 21208 


Toll Free Orders 800-628-2828 Ext. 850 
For Information 301-521-4886 








APROSPAND-64™ Gives your Commodore 64 or 128 full ex: 


pandabilty! This superbly designed expansion module plugs into the expan- 
sion port & gives you 4 switchable (singly or in any combination) expansion 
connectors - plus fuse protection - plus a reset button! Before you buy an 
expander, be sure that it has a fuse to protect your computer and that you 
can activate your cartridges in ANY combination allowed by the cartridges. 


ne 
origins! 


NOW ONLY $29.95 


Commodore Interfaces and Cables 
Cardprint G-WIZ Printer Interface #1108. $46.95 
Cardprint B (without Graphics) #1105. $35.95 
Amiga Printer Cable (6 ft) #3040-6MM. $17.95 
Amiga Printer Cable (10 ft) #3040-10MM. $21.95 
Commodore 6 Pin Serial Cable (5 ft) #3006-5MM...$ 9.95 
Commodore 6 Pin Serial Cable (8 ft) #3006-8MM...$12.95 
Add Shipping Per ttem: $3.00 Cont. U.S. $6.00 CAN, PR, Hi, AK, APO, UPS Blue 
APROTEK Daisy 1120, 20 CPS Daisy Wheel..... $319.95 


Elite 5CD, 10 CPS Daisy Wheel Printer 
Commodore Direct Connect + Parallel. 
Add Shipping Per tem: $10.00 Cont. US. 


$184.95 


$22.00 CAN, PR, Hl, AK, APO, UPS Blue 


All Products have 2 Week Satisfaction or Money Back Guarantee 
TECHNICAL INFORMATION (805) 987-2454 


CALL TOLL FREE TO ORDER: (800) 962-5800 US 
= or (800) 962.9800 CA 


As 


ue ie 
1071-A Avenida Acaso, ‘Camar CA 93010 





2 WIIKKBOR 


JUHIE 


THE 
MIRROR 
WAIL OI 


| D) R) (Or) 1 i 4 
$24.95 


NO FINER OR MORE ADVANCED ARCHIVAL COPIER AVAILABLE AT 
ANY PRICE 
EASY TO USE, DOES NOT CAUSE DRIVE HEAD TO KNOCK. 
COPIES UP TO 41 TRACKS. 
PERIODIC UPDATE POLICY. 
AUTOMATICALLY MAKES BACK-UP COPIES FROM VIRTUALLY ALL 
PROTECTED SOFTWARE 
NIBBLES, HALF TRACKS, COPIES EXTRA SECTORS AND EXTRA TRACKS. 
REPRODUCES ALL DISK ERRORS AUTOMATICALLY. 
FAST. COPIES FULL DISK IN AS LITTLE AS 4-7 MINS. EVEN COPIES 
ITSELF 
WE COPY MORE! 
MASTERCARD, VISA, M.O. OR CHECK OK 
+ $3 SHIPPING & HANDLING 
‘COD. OR FOREIGN ORDERS ADD 52 
‘CALIF, ORDERS ADD 6% SALES TAX 
— WRITE OR CALL — 


Compumed 


(408) 758-2436 
P.O. BOX 6939 
SALINAS, CA 93912 
FOR COMMODORE 64 AND 1541 DRIVE 
OR COMMODORE 128 AND 1571 DRIVE 





Software Discounters (eat 
re) j America Open Saturday ~ 


; fee na 
For Orders Only— 1-800-225-7638  * F'e6 shipping on orders over $100 in 


PA Orders— 1-800-223-7784 ¢ No surcharge for VISA/MasterCard 
Customer Service 412-361-5291 ¢ Your card is not charged until we ship 


‘ABACUS BATTERIES INCLUDED, Pinball Const, Set (D) Keys (0) $29.95 BuIldABook(D) $16 TELARIUM 
Basic 128 Consultant (64 01128) $39” Racing Dest. Set (0) LEARNING COMPANY —— Mastertype (0) $25 Amazon (D) $21 
Chart Pak 128 CALL. Home Pak (D) $33 Seven Cities of Gold (0) Ai Titles Available Call Net Worth (D) $44 Falrennolt 451 (D),_. $24 
Power Plan64 FOR —Paperclip wiSpell Skylox (0) MASTERTRONIC SIERRA Dragon WorldiD). $24 
SuperC 128 PRICES 640 128 $49 Supor Boulder Dash (0) Action Biker (O) $7 Champ. Boxing (D) . $16 Rendezvous 
Super Pascal 12 BERKELEY Touchdown Football (0) ant Attack (D) $7 Donald Duck wiRama(0) $21 
ACCESS SOFTWORKS Prices too low to BMX Racer (D) 37 _ Playground $16 
BeachHead(0) $21 Geos (D) $39 advertise!! Call Captive (0) s? 3 Word s21 
Beach Head 2i0) $24 BRODERBUND EPYX Finders Keepers (D) $7 Factory(0) $16 
Leader BoardGolt(0)$25 Bank St, Filer(D) $99 Barbie (0) $9 Intinity MachineiR) $19 Grogs Revenge(D) $16 
Leader Board Bank St Mailer(D) $33 Breakdance (D) $9 Kikstart (0) $7 Mickey's Space rer (0) s2t 
Tournament Disk $14 Bank St.Writer(D) $33 Fast Load (R) $23 5.ASideSoccer(d). $7 Advonture(D) $16 TIMEWORKS 
Mach 5(R) $23 Bank St Spoller(O). $33 Impossible Mission (O).$9 Last v.8(D) $7 Stunt Fiyer(D) $16 Acts. Payable (D) $39 
Mach 128(R) $33. Karateka(0) $19 Koronis RIN(0) $23. Paul McCartney's Winnie the Poon (0) .$18 Acts, Receivable (0) $39 
Raid Over Moscow (0) $24 Music Shop(D) $29 Movie Monster(O)... $25 feet (0). $7 Wiz Typa(0) $16 Data Manager 2(0) , $33 
ACTIVISION. Print Shop (0) $26 Multiplan 64.0r 128 $39 rhe Slugger(O) $7 SIMON & SCHUSTER —DataManagor 128. $43 
Alter Ego (Male PS, Companion (0), $23 Summer Games 2(D) $25 Vagus Jackpot (0). $7 Groat International Electronic 
or Female) $33. PS. Graphics Library Tomplo of Apahat MICROLEAGUE Paper Airplan Chockbook(o). $16 
Borrowed Time(D) $19 S16 Ea Trilogy (D) $25 $25 __Constuction SetiO) $19 Evelyn Wood 
Comp. Fireworks The Eidolon (0) $23 nager(O).$25 Stat Trak:The Kobayashi Dynamic Reador (D) $33 
Celebration Kit (0) $28 314 Vorpal Utility Kit(O) $23 am Data Disk $14 Alternativa(D)... $25 General Ladger (0). $39 
Garry Kitchen's File Now (D) $14 WintorGames (0). $25 MICROPROSE Typing Tutor (0) .$25 Inventory Mgmt(D) $39 
Gamemaker(D) $25 Fleeze Frame(R).. $33 World Championship Acrojet iO) SPINNAKER Money ManageriD). $16 
Groat American Graph Now (D) $14 Karate (0) $19 Conflict inv Adventure Creator (A) $8 Partner 128 $39 
Cross-Country G.wiz Printer Int. $47 World's Greatost F:15 Strike Eagle(D) $23 Alphabet Zoo(R). $9 Payroll Mamt.(D) $39 
Road Race(D) $19 Hidden Assets(R) $49 Baseball-Improved $23 Gunship (0) Allin Color Cavo(R) ..$9 Salos Analysis 
Hacker (0) $19 Mail Now (0) $14 World's Greatost Kennody Approac! Bubble Busters (R) $9 Mgmt iO) $39 
Little Computer S'more(R) $44 Football(D) $23 Silent Servic Cosmic Combatih). $8 Sidoways 64 or 128. $33 
People (D) $23 Super G Pr int $49 FIREBIRD MINOSCAPE Delta Drawing (A) $9 Swiltcale/SidewayaO) $33 
Mindshadow(0) $19 Write Now (F $19 Adv. Music System (D) $49 Bank St. Music makor (A) 59 Swittcalc 
Murder on the ces Colossus Chess 4(0)$23 ‘Writer (D) $19 Fraction FoverR). $9” Sideways (128), $43 
Mississippi(O) ...$23 Argos Expedition (0) so Elite(D) $19 Bank St. Storybook (0) $19 Gold Record Race (R).$8 Sylvia Porter's Personal 
Spaco Shuttie(O) $19 Big Bird's Funhousa) $9 Music System (0) $25 Bop &Wrastle(O) ...$19 Homowork HolperMain, — Yafotlers Personal 
ACCOLADE Big Bird Spe. Del (A) $9 The Pawn (0) Call Golor Me; The Computer Word Problems (D) $23 Sylvia Porter’ 
Acesof Aces (0)..$19 inFocus(0).. $23 FIRST STAR Coloring Kit(O) $19 owork Helper Personal Financial 
Dambusters(D). $19 amHouse(0).... sp SPYVS.Spy2(D) ....$19 Groat Britton Neiting (D) $23 Planner 128 $43 
Fight Night (D) $19 Ernio's Big Splash(b) $9 FISHER PRICE Software (D) $12 Lost TomtxD) $19 Word Writ 
Hard Ball (0 $19 Ernie's Magic Alpha Build (R) $9 Halley Project(0) $19 Kids on Keys if $9 ior (0 $33 
LawoltheWest(0) $19 Shapes) sg Dance Fantasy(R). $9 indianaJones(D) $49 Kung Fu 1 
PSI Trading Co (D) $19 Grover's Animal Hop Along nfiitrator() $19 Exploding Fist). $19 Word Spaliny (128) $49 
AMERICAN ‘Adventures() ....$9 anting (R) $9 Luschor Profile(0) $19 Kung Fu TRONIX 
EDUCATIONAL. Mastering the SATO) $44 Linking Logic(R) $9 Partect Score SAT(D)$44 Sticks of Doath(b) $19 sm to) $39 
Biology (0) $14 Math Mileago(D).....$9 Memory Manor (R) ‘$8. Spell ol OostructionD) $19 SPRINGBOARD UNISON WoRLO. 
French (b) $14 Movie Musical Number Tumblor(R). $9 MIRAGE Early Gamos (0). $21 Art Gallery 1(D).,,..$16 
Grammar(D) $14 Madness (D) $9 Sea Spollor(R) $9 Database wiRepon Easy as ABC(D) «$23 Print Mastor(O} $23. 
Science: Grades 40) $14 allroad Works (0) $9 GAMESTAR Generator(D). $33 Fraction Factory (D) $19 WEEKLY READER 
ce: Grades SIG{O) $14 Rich Scarry's Electronic. Champ. Basketball (O).$19 Professional Word Nawsroom (0) $33 Stickyboar ABC'S (D) $19 
Grades 7/40) $14 Word Book(0),...$12  On-Coutt Tennis (0) $19 Processor(O),....$33 NA,Clip Art Vol, 1\0)819StichyboarMeuniGr ato 
Spanish (D) $14 Sosame St, Pals On-Field Football (0) $19 MISC Clip Art Vo! 2(0)$25—Stickybear Numbersi0)$19 
US.Geograpny (0) $14 Around Town(0)...$9 _Star-League Bob's Torm 128. $49 D $23 Stickybear Roading (0) $19 
World Geography (0) $14 Success w/Aigebra Gall Baseball (D) $19 CSM 1: Stickyboar Shapes (0). $19 
World History(0) . $14 Success wiMath... Gall Star Rank Boxing(O) $19 Align Kit(O) $29 le Group (0) $37 ACCESSORIES 
ARTWORK Timebound (0) 39 HAYDEN Central Point Baitio of Antictam(0) $33 Anchor 6470 300/1200 
Beach Blanket Weather Tamers (0) $9 Sargon 3(0) $33" Copy2iD) $23 Battalion ‘Moxom wiSottware$149 
Volleyball(0), 1g“ DATA EAST HES Gato) $19 Commandon(d) $25 Bonus 85,0). $6.99 Bx 
Bridge 4.0(0) $16 KarateChamp(D)_ $23. Millionaire (D) $16 Snapshot64(A) Call Colonial Conquest (D) $25 Bonus DS OD. $799Be 
CycleNight(D) . $42 Kung FuMaster(D), $23 Omniwriter wiSpell() $28 Suporbase 64(D)...$47 Computer Ambush(0)83?_ Gompuccive Slarres 
Equestrian Show DATASOFT Project Space Supotbase 128(D).. $69 Computer QB(O)....825 Kit $19 
Jumper (D) $12 Altornate Reality (0).$25 Station (D) $16 Superscript 64(0)...$47 Field ol Firo(D) ... $25 Oatashare Printer int 
Hole in One + Six(D)14 The Goonies (D) ...$19 HI-TECH EXPRESSIONS Superscript 128.. $47 Gemstone Warrior (0)$23"wiGraghes APN $99 
Inti Hockey (D).....$18 Never Ending Story (0) $19 Card Ware (D) $9 star 64 XL8(D) .$79 Germany 1985(D) $37 Disk Caso (Holds 50). $9 
Strip Poxer(O) $21 Zorrol0). $19 Heart Ware (0) 39 at 128 (0)... Call Gettysburg (0) $37 Disk Orive Cleaner. $9 
Data Disk #1 female $16 DAVIDSON Party Ware (OD) $14 Vizawtito 128(D). Call Kamplgruppe (0)... $37 Disk Notcher 87 
DataDisk#2male $16 Math Blaster(0) $93 INFOCOM ORIGIN Mech Brigade(D) |. $37 Dow Jones Nows 
DataDisk #3 female $16 Speed Reader 2(D) $43 Ballyhooi0) $25 Ultima3 (0) $34 NAM(O) $25 Rotrioval Kit Shs) $14. 
ARTWORK PX Spell It (0) $33 Cut Throats(D) -.$23_Ultimaa(O) $39 Norway 1985(0) $23 Kralt Joystick $9 
Baker St, Dotective(O)$7_ Word Attack (D).$33 Deadline (0) $29 PROFESSIONAL Phantasie (0) $25 Panasonic 1080 100 
Hole In One Golf(D) ..$7 DIGITAL SOLUTIONS Enchanter(D) $23. SOFTWARE Phantasie2(D) $25 “cps dot matrix 
Hotel Alien (0) $7 Paperback Writer 64 Call Hitchhiker's Guide to. ‘Fleet System 2—W,P. Questron (D) $25 _printor . Great Deal 
Jumpin’ Jimmy (0) $7 Paperback Writer 128.Call the Galaxy(D) ..,.$23. _ w/70,000 word spell Rings of Ziltin(D) ..$25 Sakata 13” Color 
Pro Boxing (D) $7 ELECTRONIC ARTS Infidel (0) $25 chocker640r128 $39 USAAF.(D) $37 ~"Gomposite Monitor 
AVALON HILL ‘Adv. Const, Set (D) Invisiclues S5Ea, FlootSystem3(128) $49 Wings of War(D)....$25 for cba $139 
Gulf Strike (0) $19 Archon 2: Adept (D) Planetfall(O) $23 RANDOM HOUSE Wizard's Grown (0). .$25 Teknika MJ22 RGBicomp 
Jupiter Mission 1994(0)823 Bard's Tale (D) Sorcerer (0) $25 Alpine Encounter (D) $14 SOFTSYNC ‘monitor for G128 Call 
Parthian kings (0),..$16 Carriers at War (D) Spollbreaker(D) $29. Charlie Brown's Desk Manager Total Auto Answer 
Rippor (0) $16 Chossmaster 2000 (0) Suspect (0) $25” ABC's (D) $14 64.07 128(0) $25 “Auto Dial Modem 
Super Bow! Europe Ablaze (D) Trinity 128 $25 Snoopy's Reading Trio 128 (0) $43 oftware... $24.88 
Sunday (D) $21 Heart of Africa (D) Wishbringer (0), '$23_ Machine (O) $14 SUBLOGIC sal Printor Stand $16 
SBS 1984 Team Disk.$14 Lords of Conquest (0) ‘Witness (D) $25 Typing Is A Ball, Flight Simulator 2(0) .$32 Handle... $17 
SBS Champs Disk. $14 Mall Order Monsters (0) Zork 1(D) $23 _ Charlie Brown(D) .$14 FS, Scenery Disks..Call_ Wico Bos $12 
Spittire '40 (0) $23 Movie Maker (D) Zork 2.01 3(0) $25 SCARBOROUGH Football (D) $29 Verbatim Buik 5 
Title Bout (0) $19 Music Const. Set (D) KOALA Boston Computer Jet (0) $29 SS. DD '$59/100 
Tournament Golf(0).$19_ One-on-One (D) Muppet Learning Diet (D) $33 


P.O. BOX 111327—DEPT. CG BLAWNOX, PA 15238 


* Ordering and Terms: Orders with cashier check or money order shipped immediately, Personallcompany checks, allow 3 weeks cloarance. No GOD, Shipping: Continental 
{San Graors under 00 aad. ve shipping on erdere Gear $100, vesidams ads Gus ston tak AR HT POMBO oa $5 on all orders, Sorry—no Intemational orders, Defec 
tive merchandise will be replaced with same merchandise, Other returns subject to a 15% restocking charge—NO CREDITS! Gall for authorization number, (412) 361.5291, Prices 
subject to change without notice, Modem Owners: Type Go SDA on Compuserve's Electronic Mall to see our On-Line Catalog of over 800 software titles for Atari, Commodore, Ap. 
ple, & IBM. Summer Hours Mon.-Fri. 9 A.M.5:30 P.M, EDT + Sat, 10 A.M.5 P.M, EDT 











YOU CAN DO ALOT MORE WITH MUSIC THAN YOU’RE DOING NOW! 
— Did you play an instrument in school? 

— Nomatter what your musical backgroundis, these new 

computer music products will bring out your talents! 


@ SYNTHESIZERS AND DRUM MACHINES 


@ COMPUTER SOFTWARE AND HARDWARE 
@ SEQUENCERS, PROGRAMMERS 
@ HOME RECORDING EQUIPMENT 


ASE WAS 
30 


i—I 
fe 





USE YOUR COMMODORE 64! 
$ MUSIC SHOP SOFTWARE 
d clicking 


$99.95 MIDI INTERFACE FOR C64 
AVE S30 0 software and MID! 
mmodore 64/128, 
eae 23 EDITOR/LIBRARIAN FOR CZ104 


0 Great for making yourown CZsounds! 


$4 95 orerc mip sauvie: (SEQ) 


40-DAY SATISFACTION GUARANTEED 

WE HAVE MANY MORE PRODUCTS 

AVAILABLE. IF YOU DONT SEE WHAT 
YOU WANT HERE, CALL US! 








NEW! AMIGA AND ATARI ST! 
CALL FOR LATEST MUSIC PRODUCT INFORMATION 








‘APPLE II SERIES 
Passport Interface 
lIC Interface. 
Passport Midi 4+ (Seq) 
Passport Leadsheeter (Not) 
Yamaha DX Editors 
Casio CZ101 Editors 
Textures Sequencer 
Educational Software 
MACINTOSH 
Deluxe Music Const. Set 
Mark of the Unicorn (Seq) 
Mark of the Unicorn (Not) 
MAC Interfaces 
MAC Synth Editors 
IBM MUSIC SOFTWARE 
KEYBOARD. SYNTH, ETC. 
CZ SERIES 64 VOICE CART. 
4 TRACK RECORDERS 
DRUM MACHINES 
ATARI 800/130XE MIDI SYSTEM 


From 75.00 
From 40.00 


FUTURE 
MUSIC 





‘START YOUR COMPUTER MUSIC SYSTEM TODAY 


SAVE 
$299 CASIO C2104 $200 
PROFESSIONAL SYNTHESIZER SOUND, UPTO 4 UNIQUE 

PROGRAMMABLE, PORTABLE, 
THE STANDARD — 


FREE AC ADAPTER & SHIPPING 








BOOKS ON MIDI, MIDI PRODUCTS 

di - 82 Pages 395 
@ HowtoUnderstand& Program theDX7. 24.95 
@ Synthesizer Technique 8.95 
Send cost plus $1.50 postage and handling to 








the address below or call toll free to order 





FUTURE MUSIC IS THE ONLY MUSIC STORE 

DEVOTED TO COMPUTER ENTHUSIASTS & 

HOME MUSICIANS. 
MASTERCARD AND VISA AC 


CALL 24 HRS. TOLL FRI 


4-800-FOR-MIDI 














FUTURE MUSIC, 1465 Terminal Way. Mail Orders and Correspondence to: Box 1090, Reno, NV 89504. Nevada Call 702-826-MIDI. Cust. Service 702-359-MIDI; 9-6 PDT 











@ LIFETIME WARRANTY 
TYVEK SLEEVES * LABELS 
WRITE PROTECTS * PACKAGED 


FACTORY NEW — 1st QUALITY 








‘50.83 100-999 1000+ 


ceneric SSIDD .60.55 .50 
BASF DS/DD 1.00.95 .90 


"4 Verbatim. | 


100-999 1000+ 


SSIDD 1.00 95 .90 
DS/DD 1.50 1.40 1.30 

























= NEW 
jes = LOW PRICE 
| Grows CALLI J 











M.C.S. 
MicroComputer Services 
7756 
In Michigan [313] 427-0251 
INFO & CUSTOMER SERVICE — [313] 685-7766 
HOURS: MON - SAT 10.00 A.M. - 6:00 PM, 
15076 Middlebelt, Livonia, Mi 48154 













DISKS 50¢ - PRINTERS - 





Canon PJ]O80A 


COLOR INK JET. 
g35 


LIMITED TIME OFFER 





cae] GEMINI 10X 


$149° Fae. 


FRICTION & TRACTOR 


ve stal™|NX-10) 



















Oo. 





$239°° ees 


N.L.Q. » SHEET FEEDER 
REAR TRACTOR/FRICTION = 
5K BUFFER 


SEIKOSHA SP-1000 


COMMODORE READY 


$179°° 


NEAR LETTER QUALITY 
FRICTION & TRACTOR 
100 CPS + 1.5K BUFFER 












COMMODORE READY 













$7925 FROM EPSON 
\ 50 CPS * TRACTOR FEED 





(commodore 


EDUCATOR 


We Bought 
‘em All 
FAR BELOW 
DEALER COST 













RETAIL 
493.95 


REGULAR 
DEALER 
cost 
325.00 






+ 100% C-64 Compatible 

* Built in Hi-Res Green Monitor 

* Heavy duty power supply and 
sturdy case 

* All units completely refurbished 
with full 90 day warranty 


$199.95 


SPECIAL QUANTITY DISCOUNTS 


MC/VISA/C.0.D. 
Dealer inquiries tm 
All prices discounted 
for MC/VISA. Shi 
Educator $20.00. 
13d $2.00 per order). Add $2.00 for 
jeduced shipping for large quantities. 
lability subject to change 





MANUFACTURERS WARRANTY. 





PUBLIC NOTICE 


We are an authorized liquidator of consumer 
products that must be quickly sold at drastic 
price reductions for many reasons, such as: 
Discontinued lines. Last year's models, 
Distributor's surplus. Canceled orders. Bank- 
ruptcy. Factory overproducton. Out-ol-season 
products. Tailends of inventories. 
Whatever the reason for the liquidation you are 
assured of fine quality at money-saving low 
prices! Supplies are limited. Order now! 


Authorized Liquidator 


COMMODORE COMPATIBLE HARDWARE 


SEE 
YOUR 
GAMES IN 
COLOR! 


FAMOUS BRAND 


Save 
OnA 
Factory 
New 
Discontinued 
Model 


Sorry, we are 
not permitted to 
print the famous 
brand name. 
But we can tell 
you if you call 
Us Toll-Free. 


COMREX™ by EPSON® 


13” COLOR MONITOR 


Compatible with 
Commodore 64K™ 
and Apple II® Series 


Limited Factory Warranty: 
2 Years on Parts and Labor; 
3 Years on Picture Tube 


Mfr. List Price $249.00 


ussssin STAG 


Mem H-1381-7003-809 
Shipping, handling: $12.00 


DISK DRIVE 


Are you still wasting time using 

just ONE drive? Buy a SECOND 

drive to make quick back-up 

copies...and to use double-drive 

software with ease. 

© Commodore compatible (C64, 
SX64), 

© 2K RAM, 16K ROM, Maximum 
storage of 170K formatted data, 
35 tracks. 

© Uses 51%" floppy diskettes. 

© Serial interface. 


Famous Brand LETTER QUALITY PRINTER 


© Commodore compatible (C64, SX64, Plus/4, 
C15, VIC20) 

© Add to your present equipment for office 
quality appearance of letters, reports. 

© Prints 18 cps, Bi-directional printing. 

© Triumph-Adler compatible printwheel. 

© Upper/lower case letters, numerals, symbols 

© Spacing: 10, 13, 15 cpi. or proportional select- 
able. 48 lines per inch maximum. 
@ 13” max. paper width (11” printable width). 


Original List: $395.00 $188 
Liquidation Price re Factory Reconditioned 


Item H-1381-4184-t -016 Shipping, handling: $11.50 With Factory Warranty. 


SEND ME THE ITEMS | HAVE LISTED BELOW 
Sales ouside the 48 conliguous sta 


© Liquidation of a discontinued 
model. 

© Can be used with your VCR 

© Superior color picture quality. 

© Manual controls for tint, color, 
contrast, horizontal, center and 
vertical hold 

© Power indicator light, video and 
sound input terminals, 

© 270 line resolution, 

© 40 character (8 x 8) x 24 line 
display. 

© Size: 14" H x 13%" W x 15%" D. 

© Does not include connection 
cable, (Contact local stores.) 


COMMODORE 
TRACTOR FEED 


Liquidation is due to discontinued 
model. Now use continuous paper 
AND single sheets in your Commo- 
dore 803. Quickly snap inthis tractor 
feed unit. When installed, you can 
still use your friction feed, too! 


90-Day Limited Factory Warranty. 


Mfr. List:$39,95 $19 
Liquidation Price . . 
Item H-1381-7004-286 
Shi 1g, handling: $4.00 
.0.M.. Direct Marketing Corp. Hem H-1381 
14605 26th Ave. N./Minneapoli, MN 55441-3397 
toms shown at right. (Minnesota residents add 6 
tax Sorry, no GOD orders) 
OiMy chock or money order is enclosed. (No delays in 
processing orders pd by check: thanks to Telecheck) 
Charge'O visas 0 erCards 
Acct. No 
PLEASE PRINT G 
Name 
Address 


City irect Marketing Corp. 


These are factory 
reconditioned units, 
warranted by the 
U.S. manufacturer! 


Original $269.00 


List Price . 


outun STAD 


Hem H-1381-3553-013 
Shipping, handling: $8.00 


Credit card customers can order by phone, 
24 hours a day, a (7 
Tdays.a week. Visa 


Toll-Free: 1-800-328-0609 


TEM You check is welcome! 
No delays in orders paid by check. 
Sales outside the 48 contiguous states are subject to 
special conditions. Please call or write to inquire. 








american Express 


Exp—L_ 


“ARLY 











2p. 





Phone 2S mn 


Sign Hero 





Authorized Liquidator 
14605 28th Avenue North 
Minneapolis, Minnesota 65441-3397 








THE ULTIMATE CONTROL INTERFACE 


Compatible with C64, 
C128 in 64 & 128 modes, 
and C128 in CP/M mode 


Universally applicable dual 6522 Versatile Interface Adapter (VIA) 
board, Intelligently control almost any device. Perform automated 
testing. Acquire data for laboratory and instrumentation 
applications. Provides four 8-bit fully bidirectional I/O ports & eight 
handshake lines. Four 16-bit timer/counters. Full IRQ interrupt 
capability. Expandable. Includes extensive documentation and 
programs on disk. $169 postpaid USA. Each additional board $149. 


SYMBOL MASTER MULTI-PASS 
SYMBOLIC DISASSEMBLER 


‘The original and best is now even better with Version 2.0! 
Disassembles any 6502/6510/undoc/65C02/8502 machine code 
program into beautiful source. Includes both C64 & C128 native 
mode versions. Learn to program like the experts! Adapt existing 
programs to your needs! Outputs source code files to disk fully 
compatible with your MAE, PAL, CBM, Develop-64, LADS, Merlin or 
Panther assembler, ready for re-assembly and editing, 100% 
machine code and extremely fast. 63-page manual. Advanced and 
sophisticated features far too numerous to detail here, $49.95 
postpaid USA, 


PROFESSIONAL UTILITIES & RESOURCES 


+ C64 Source Code, Most complete available reconstructed, 
extensively commented and cross-referenced assembly language 
source code for Basic and Kernal ROMS, all 16K. In book form, 242 
pages, $29.95 postpaid USA. 

* PTD-6510 Symbolic Debugger for C64. An extremely powerful tool 
with capabilities far beyond a machine-language monitor. 100-page 
manual. $49.95 postpaid USA. 

* MAE64 version 5.0, Fully professional 6502/65C02 macro 
editor/assembler. 80-page manual. $29,95 postpaid USA. 


SCHNEDLER SYSTEMS 
1501 N. Ivanhoe, Dept. G8, Arlington, VA 22205 
Information/Telephone Orders (703) 237-4796. VISA/ MasterCard 

















COMPUTE"s Gazette 
Subscriber Services 


Please help us serve you better. If you need to contact 
us for any of the reasons listed below, write to us at: 

COMPUTE!'s Gazette 

P.O. Box 10957 

Des Moines, IA 50340 
or call the Toll Free number listed below. 
Change of Address. Please allow us 6-8 weeks to effect 
the change; send your current mailing label along with 
your new address, 
Renewal. Should you wish to renew your Gazette 
subscription before we remind you to, send your current 
mailing label with payment or charge number or call the 
Toll Free number listed below. 
New Subscription. A one-year (12-month) U.S. subscrip- 
tion to COMPUTE!s Gazette is $24 (2 years, $45; 3 years, 
$65. For subscription rates outside the U.S., see staff 
page). Send us your name and address or call the Toll 
Free number listed below. 
Delivery Problems, If you receive duplicate issues of 
COMPUTE!'s Gazette, if you experience late delivery, or 
if you have problems with your subscription, please call 
the Toll Free number listed below. 


COMPUTE!’s Gazette 


1-800-247-5470 
In IA 1-800-532-1272 




















Gree Spirit Software, Ine. 


Music of the Masters - $9.95 

One full hour of classical music on disk for 
the C64 or C128 in64 mode. Screen commentary 
on the various composers, Mozart, Handel, 
Beethoven & many more! 


Music of the M Volume It - $9.95 
‘More classical music from the world's greatest 
composers. Waltzes, minuets, sonatinas 
and other compositions by Chopin, Schubert, 
Brahms, Mozart & many more! Includes a 
special study on the Bach family. For C64 or 
C128 in 64 mode. 


SPECIAL OFFER! Order both volumes of 
Music of the Masters for only $16.95! 


BASICally SIMPLE 64 - $14.95 

How to use all C64 Basic 2.0 commands and 
operators in Basic programs. Everything 
‘explained in clear, concise terms. After you 
become an expert programmer, this disk 
makes a handy reference guide. 


BASICally SIMPLE 128 - $19.95 
How to use all C128 Basic 7.0 commands 
and operators in Basic programs. Instruction 
in graphic, sound and music commands 
included. Hundreds of easy to follow examples 
provided on this 128 mode disk. 


TECHNIQUE! - $19.95 

Easy, direct instruction in programming graphics, 
animation, sound and music on the C64. 
Disk includes machine language music pro- 
gram, several tunes and an example game. 





Free shipping & handling for U.S. orders! 
Minois residents add 7% sales tax. Send 
check or money order to: 

Free Spirit Software, Inc. 

5836 S. Mozart 

Chicago, Illinois 60629 
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CONVERSE WITH DI 
YOUR COMPUTER 


[AT LASTI A FULL IMPLEMENTATION of the original ELIZA pro- 
{gram is now available to run on your Commodore 64) 

Created at MIT in 1966, ELIZA has become the world’s most 
Colebrated artifical inteligencedemonstration program. ELIZA sa 
fon-ditective psychotherapist who analyzes each statement a 
you type it In and then responds with her own comment or 
{Quostlon—and hor romarksare often amazingly appropriate! 
Designed fo run on a large maintramo, ELIZA has nover betore 
been available 10 personal computer users except in gr 
Stripped down versions lacking the sophistication which mi 
‘original program so fascinating, 

Now, out new Commodore 64 version possessing the FULL power 
And range of expression of the original is being offered at the 
introductory price of only $25, And if you want to find out how ahe 
does it (or teach her to do more) we will include the complete 
SOURCE PROGRAM fo only $20 additional 

(Order your copy of ELIZA today and you' 
torespond when you hear someone say, "Oki 
‘computer of yours ean actually do! Berirtend eh 


EAD WHAT THE EXPERTS SAY ABOUT OUR VERSION OF ELIZA: cries wasn 
"Much more than a mere gam Use as soph 
ELIZA,..A convincing demonstration of Ari! nai 
PC MAGAZINE 
"Delightful entertainment,..An ideal medium for showing off your 
systom “MICROCOMPUTING MAGAZINE 
'ELIZA/s an astounding plece of software... ta 
touse and study.” —BARON’S MICROCOMPUT! 
ELIZA is 1 introduce yout friends to computers... 
very funny party game: PETER A. McWILLIAMS 
ELIZA ‘ceptional program. on 
your machine, and has great historical inte 
“POPULAR COMPUTING MAGAZINE 
his version of ELIZA i the best we have seen. As a party game, 
isunmatched” — —HOME APPLICATIONS FOR THE C-64 
ELIZA IS AVAILABLE IN THE FOLLOWING FORMATS: 
(Please speclty Disk or Cassoto) 
1, Prot@ctod VOrBION «ssesrsrsssscserssecseaes 
(Protected Version can bo run bu not isted or modified) 
2. Un:protected Commodore 64 BASIC Source Version... 
(Source Version can be listed and modified run) 
Both versions include a six page user manual. C 
Please add $2.00 shipping ard handling to all orders 
(California residents please add 6W% sales tax) 


Monitor and cor 
‘# Conirt tights. app 


motors and virtually 
wonder how 


what this 


pressure and vibra 


Provides 8 mem 
Allows access 10 6 
Naintrface could 
Asie bs 
4 bit input ports 


into use, shows off 


he ¢ BH100 is a 


$45 Do 


IVER 1 


rol 
iances, heating 


Connect to temperature, ight, sound, moistore 


on sensors = plas 


esting and experiment 
laboratory data acquisition system: 


ach port via one statement in BASIC 


aipat ports (22 separate output lines) 
32 separate input ines 

A comvenient 14-pin DIP socket interface 
1 channel A/D plugin conversion mod 
second sampling time: $25. 

8 channel A/0 plug-in conversion module with 100 micro 
second sampling time: $50. 

1811100 User Manual includes instruct 
and dlagramsof typical hookups 


ry powers 


not let the price fool yor 


INLY *129! 


Specity €-64, VIC-206 Apple 2/20 


ARTIFICIAL INTELLIGENCE RESEARCH GROUP Intelligent 10. tn. 


921 North La Jolla Avenue, Dept.G x 
‘Los Angeles, CA.90046, 

(213) 656-7368 (213) 654-2214 

MG, VISA and checks accepted 





Lawrence Ave, Ho 70 


Potsdam, NY 12676 
(315) 266-0380 





HE HIDDEN 
POWER OF YOUR COMPL 


LEROY’S CHEATSHEET* 


KEYBOARD OVERLAYS 


be 
ito 
ee ey | 


COMMODORE 128 
DIE-CUT 


BASIC 7.0 OFOR THE BEGINNER 
CBLANKS( yoi"iaminates) CMULTIPLAN 

O bisk 1571 CO papeR CLIP 128 

CG easy script Csupersase 128 
FLEET SYSTEM 243 Cworppro 128 


FREE Keyboard Extender With C-128 Order 


V SAVES TIME - ENDS FRUSTRATION 
GET TO KNOW YOUR SOFTWARE BETTER 
FITS OVER KEYBOARD 
COMMANDS AT YOUR FINGERTIPS 
LEARN NEW SOFTWARE FASTER, BASIER 
STURDY PLASTIC LAMINATE 
UNBEATABLE PRICE! 


SOFTWARE I! 


NOW buy your SOFTWARE from LEROY at 20% OFF list price 
(hundreds of titles available) 


SPECIAL OFFER 


Buy any software package (minimum $25.00 order) and get 
a FREE LEn0v's CHEATSHEET ot your choice! 





SHIPPING OVERLAYS $1.00 shipping per order US. & Canaca 
-ANO TERMS: $3.00 for foreign orders 
STANDS $3.00 shipping EACH 48 states 
$5.00 Canada, Hawali, Alaska 
US. funds NO GOD. 


Cpj CHEATSHEET PRODUCTS INC 


P.O. Box 111368 
PITTSBURGH, Pa. 15238 =e] 
(412) 781-1551 


ADDRESS. 


ager 
4 SS 
Cy 


COMMODORE 64 


CUT-OUT~YOURSELF ON DOTTED LINES 


SMART 64 TERMINAL, 
SPEEDSCRIPT 
SPRITES ONLY 
SUPERBASE 64 
TERM 64 

IOTEX 

VIP TERMINAL 
VIZASTAR 

WRITE NOW! /64 
801/803 PRINTER 
1526/802 PRINTER, 
EPSON AX/FX 80 
GEMINI 10K, 18% 
OKIDATA 92/93 


BASIC MANAGER 
BLANKS {set of 3) © OMNIWRITER 
CALC RESULT ADVANCED PAPERCLIP 
CALC RESULT EASY PILOT 

COMAL PRACTICALC II 
CONSULTANT PRACTICALC 64 
DISK 1541 FOR THE BEGINNER 
boone HES MON 64 
EASY CALC NES WRITER 
EASY SCRIPT MULTIPLAN 
FLEET SYSTEM 2 SCRIPT 64 
FLIGHT SIMULATOR It SIMONS' BASIC 
LOGO sheet 1 SKY TRAVEL. 
L060 sheet 2 


oDoo00000000000 
Oo00000000qc0000g 


LEROY'S CHEATSHEETS are durable plastic laminated keyboard overlays designed for use 
with popular software, hardware, and languages for the Commodore 64 and 128, 
When laid on your keyboard, LEAOY'S CHEATSHEETS Surround the keys with essential 
information, placing your most valuable computing tool at your fingertips 


We take time to learn and use each program before designing a Cheatsheet. For quick 
reference, commands are grouped according to function, The actual keystrokes are in 
bold type and variables are shown in italics. ALL the COMMANDS are included, and many 
extra shortcuts are added. 


Now you can use your software faster, more easily and more effectively. 
With LEROY'S CHEATSHEETS You'll never have to hunt for a program command again. 


THE PROBLEM SOLVER 


EQUIPMENT STAND 


By LEROY 


SPECIALLY DESIGNED FOR COMMODORE COMPUTERS 


VINYL COATED - 1/4" DIAMETER | ORGANIZE YOUR SYSTEM 
WELDED STEEL CONSTRUCTION KEEPS EQUIPMENT COOLER 
18" WIDE 4° HIGH 11” DEEP PERFECT FOR PRINTERS 
PUTS YOUR CRT AT EYE LEVEL CO EQUIPMENT STAND 





SUBTOTAL SHIPPING 
BBTAX Pa. nesioenrs 
TOTAL OF ORDER 


MC/VISA# EXPIRES. 





NAME. 








city. 








Commodore Compatible 
and only... $139.00 for the Commodore 128 


DON'T GIVE UP YET! 


virtually all 64/128 
Software with 


NEW 1571 Clone“ 


Months of R&D have gone into the 
CR CLONF MACHINE™ for 1571 
Now you have the ability to 
reproduce GCR signals to back up 
virtually all software for the 


3 = 64/128 including CPM (double 
FSD-1 5%4”Disk Drive sided too!). Included are: 


Dyers See Meu ECS: alii | [1 Full Density Utility 2 GCR Copy 


Peretti | jy oirectory Utilities « Auto Boot 


modore series of personal computers. This disk drive is fully compatible Maker (64&128 Modes) s) Expansion 
with the Commodore 64 computer and directly replaces the Commodore module section (for future updates). 
1841 Disk Drive, giving much better performance in terms of data loading LL THIS for only $49.95 


and writing speed and memory buffer size. PAINTERIDIENTARE 
Special Features To Order call toll free The MW-350 interface has be 
Full 6 month warranty—your ass! 4-800-356-5178 e 50 interfaci en 
ance of quality 


Slim line construction—to fit in those 
smaller places {$8100 shipping and handling. Or mail your total 


Vented metal ch: and order with check or money order to: graphics, correct aspect M@ LUISE 
Wiecwanee ieee x ratios, print buffer, etc. Insist Mii 

Dua serial pot with chaining option for 2 on compatability for only $79.00 iero: 

Ste" indus standard format —. 7 ‘MIDI APPLICATIONS IC 


at a er er eeenEs | 1Synthesizers, Interfaces, Music 


“pop out” problem 541 Willamette Street i ncer Software, Lic 
* Built especially for C-64 users Eugene, OR 97401 Diseareruen — 


Remember, no sales tax in Oregon. Tel. 503-683-1154 


LOTTA CIPHER. 
acta eR TOUR EnV CIIEN Oe 
“Window Kasie 
yr 


revised to fully support the 126 
STONE | | including complete CPM emulation (ULAR Slee 











THE 
STOCK BROKER. BANNER 


en MACHINE 





Reka ABANDON SHIP. 








ive iY REGARDS TO OAYEY JONES. 12148 C44 ome 





ACORN = Ss 


219-879-2284 
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Classified 





SOFTWARE 


FREE SOFTWARE for C64, C128, IBM, & CPM 
send SASE for info (specify computer) to: 
PUBLIC DOMAIN USERS GROUP, 

PO Box 1442-A2, Orange Park, FL 32067 


COMMODORE: TRY BEFORE YOU BUY. Top 25 
best-selling games, utilities, new releases. Visa, 
MasterCard, Free brochure, Rent-A-Disk, 908 9th 
Ave., Huntington, WV 25701 (304) 522-1665 


FREE MEMBERSHIP IN SOFTWARE CLUB. 
‘Top British C64 programs, Catalog and reviews 
(no strings). ARROW EXPRESS, Box 205-G8, 
Rossland, BC VOG 1Y0 


Play INSANE WE TRUST! The West Coast 
favorite for the C-64 on disk, Tricky 
quiz-type gamt, Only $6 to; Tom Balvin, 
2555 Altura Ave,, Montrose, CA 91020 

















BASEBALL PLAYERS/COACHES. Display, save, 
print your team’s roster & complete statistics (up 
to 20 players /team), C64 & 128, Disk $19,95 
(mbg), Scoreboard Software, Dept. G5, POB 
31566, Phoenix, AZ 85046. (602) 992-4072 


VEGAS-Casino Games for the C64. 
Includes: Blackjack, Slots, Poker, Keno, 
Baccarat, Chuck-a-luck. All for only 
$14.95. PAR Value Software, PO Box 1818, 
Vicksburg, MS 39180 


ATTENTION COMMODORE GRAPHIC BBS 
USERS! Get the ultimate graphic message maker! 
GRAPHIC MAGIC V3.0! On-screen menus! Easy 
editing! Printouts! FREE ColorDisk sample! Only 
$9.95! PACIFIC DISTRIBUTING, 801 E, Harrison 
St,, Seattle, WA 98102 















ELECTROCALC can do your electronics 
calculations: Resonance, crossover, etc, C64 or 
128 (specify)—$19.95 postpaid, NOVASOFT, Rt 
1, Box 107B, Kinston, NC 28501 





Play HEARTS on C64 against 3 computer-card 
experts. Several game variations, Send $19,95 to 
Barry Miller, 258 Toftrees Ave, #216, 

State College, PA 16803 


PRO FOOTBALL FANS. WEEKLY PREDICTIONS 
with your C64, Team stats analyzed to pick 
winner, With or without point spread. 
Cumulative stats, Menu driven, Disk $21.95. 
Kelkris, 433 Viola, Hubbard, OH 44425 


LOWEST PRICES IN AMERICA, for C64 soft- 
ware, Send $2 for sample disk of over 30 
programs and catalog of 8000+ programs 
FRUGALWARE, 23 E. Green, W. Hazelton, PA 
18201 














DIRECT SALES DISTRIBUTOR’S HELPER - C64 
Does inventory, order forms, reports and more. 
$59.95, Send SASE for free demo kit, RD3 Box 
413, Kunkletown, PA 18058 








MUST games for C64/128 owners! Las Vegas, 
Monopoly 64/128, Songs é& Sounds, Brain 

Game, @ $9.95, all four $35.95 ch/m.o, to: DCS, 
L. Beach, CA 90806 (213)595-0899 


Full-featured, user-friendly 








BRIDGEBRAI 
contract bridge for C-64, $30 (T or D) or $1 for 
Info to: George H. Bodner, PhO, 1134 Harvard 
Pittsburgh, PA 15212 









ON INTEREST/MORTGAGES/ALL. 
. "PREPAYMENT" gives hard facts to 

show ways to cut § from any loan at any given 
time, Plus utilities. $19,95 + $2 p/h, C64 disk, 
WILCAR INC., P.O. Box 8111, Phx, AZ 85066 


PRINTSHOP™ OWNERS 
Four new C-64 Graphics Collection disks 
Scenes, Symbols, Animals, Holidays 

60 graphics per disk—Each disk $9,95 

Write to VISION-Soft, 320 N, Monterey, 
Farmington, NM 87401 for more information. 


BASEBALL TRIVIA QUESTIONS for 64/128, 
300 questions from past and present. Disk $16.95 
CH/MO to Triple Play Software, P.O. Box 493, 
Fairfax, VA 22030 


LAS VEGAS/ATLANTIC CITY CASINO ACTION! 
20 superior games. Blackjack, 21, Craps, 

Poker, Slots. C64/128, $12.95: M, ADAMS, 
6547 N. Acad, #446-A1, C, Spgs, CO 80907 


HARDWARE 


NEW FOR C-64 - SPEECH SYNTHESIZER! 
has third generation voice chip, male, female 
voices, sings, Kits/Finished Units! SASE to 
SJ, Box 11205, Clearwater, FL 33516 


ATTENTION COMMODORE 64 MODEM 
OWNERS: Convert any Commodore 64 modem 
to RS-232 format! Easy to build interface allows 
you to use your modem with IBM, Amiga, 520 
51, or any computer with an RS-232 port, Send 
$10.00 for complete plans to: LEE CONSULTING, 
14810 NE 1 St, #D, Bellevue, WA 98007 


PHOTO AND $5 GETS C64-GENERATED 
Master” for personalized stationery that wil 
knock your socks off! No ‘‘canned’” graphics... 
It’s ALL YOU! SASE and $1 for budget “DIY” 
info, Nothing else like it! "LET-R-HED", 
Adjuntas, PR 00601-0971-Z. Best head width 3”, 












































COMPUTE!’s Gazette Classified is a low-cost way to tell over 275,000 
microcomputer owners about your product or service. 


Re 25 pot line, minimum of four lines. Any or all ofthe fit line st in capital Jeter at no ¢ 


for boldface words, or $50 for the 

Fates, 

Terms: Prepay 
checks payable to COMPUTE! P 

Form: Ads are subject to publishes 
letters and spaces between words, Please underline 


plications, 





telephone numbers. Orders will not, 


iro ad sot in boldface (an) 


number of lines.) Inqull 


went is required. Check, money order, American Express, Visa, or MasterCard is accepted, Make 


approval and must be either typed or legibly printed. One line equals 40 
i ords to Be satin boldiace : 
General information: Adveriser wing post fie Hox numbers in ther ads must supe 
£ acknowledged. Ad will appear in next avail 


ddress and 
ceipt 





mane! 
fe issue after 





Closing: 10th of the third month preceding cover date (e.g. June issue closes March 10th), Send order and 





remittance to: Harry Blair, Classified Manager, C 
place an ad by 


MPUTEt's Gazette, P.O. Box 5406, 
jone, call Harry Blair at (919) 275-9809, 





oh 
Nétioe: COMPUTE! Publications cannot be responsible for offers or claims of advertisers, but will attempt to screen 


‘out misleading or questionable copy 














REPAIRS! 

See our full-page ad in this issue! 
TRIAD COMPUTERS 
1-800-624-6794 or 919-299-0391 


MISCELLANEOUS 


DIAL-YOUR-MATCH COMMODORE-128 BBS 
SYSTEM. Easily define 50 questions/3 
matchmaking modes/BBS maintains itself 
AUTOMATICALLY. Full COMMODORE-128 
MODE usage/Any number or type of disk 
drives or hard disk/Use 300 or 1200 baud/40 or 
80 column mode/1670-1660-1650-Hay 
modem/20 into files, 20 public message 
boards/Remotely access all SYSOP 
‘commands/Have moro than one SYSOP/User 
levels allow restriction 80 a subscription BBS Is 
possible/Text editor bullt-in/Accurate time & 
date/Chat with, dump, or browse caller easily 
Built-in terminal mode with downloadl/Call a 
BBS & download text/Split-Screen viewing of 
caller's questionnaire/Exchange messages 
automatically between remote BBSs using 
DYM-NET/DYM-NET forwarding avoids toll 
calls/Advanced Technology makes othe BBSs 
obsoletel/Popularity quaranteed!/Make 
hundreds of exciting new friends!/Written in 
BASIC and UNPROTECTEDI/Please ORDER BY 
MODEM 1-818-840-8066 (300 BAUD) or write 
DYM 128, P.0. BOX 6055, BURBANK, CA 91510 











Personal Computer Owners CAN EARN 
$1000 to $5000 monthly, selling simple services 
performed by their computer, Work at home - in 
spare time. Get free list of 100 best services to 
offer. Write: C.LL,D.L, P.O, Box 60369, San 

ego, CA 92106-8369 














PRINTER RIBBONS *Commodore 801/803- 
$8.75. *Com 1525/1526, Legend 800/880, 
Banana, Spirit 80-$7.95 *Epson MX/FX/RX 80- 
$5.25 *Gemini 10/15, Okidata 82,83,92-$2.95 
Min. Order: $10. Add $2 S&H Per Order. 
BOOK KEEPERS, 944-10th, Sidney, NE 69162 


COOLING FANS for C64/128 Disk Drives 
Only $39.95 or $59.95 w/surge protection 
(See ad, June GAZETTE, p, 120) 414-277-9120, 
Aier Products, 522 W, Bergen, Milw., WI 53217 


BBS CONSTRUCTION KIT - Create your own 
customized BBS! $51.50. For more info call 

or write: Powersystems, P.O, Box 822, 
Coventry, RI 02816 * BBS 401-822-4605, 


REPAIR: C64 (including p/s)-$45, 1541 
(including clean, lube, align)-$50, BUY/SELL: 
Commodore parts or whole units, CONTACT: 
Dave Taylor (915) 683-8398 or Jerry Dees (915) 
561-8483, 5106 Daventree St., Midland, TX 
79705 (parts and labor warranted 30 days) 


USE BOTH SIDES OF DISK WITHOUT CUTTING 
notches, Ideal write protection, Easy no solder 
kit. Send $7.95 + 50 p/h to: TDE, Box 1482, 
Windsor, CA 95492-1482 


“THE ULTIMATE 64 DISK MENU” 

Autoload /run Basic-ML prgs. INSTANTLY 
restore menu - even during another prog. 
Remarked Basic & ML on disk w/dors. Send $12 
to: Colony SW, POB 4712, Huntsville, AL 35815 
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123 Electronic One 
124 Emerald Component 
International : 
125 Federal Hill Software . . 
126 Firstline Software, Inc. 
127 Free Spirit Software, Inc. 
128 Future Music 
HesWare ... 
151 Infocom, Inc. 
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135 Micro Computer Services . 122 
136 Micro-W Distributing Inc. .. 126 
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First Book of Commodore & 
Electronic Computer Projects 





40 





reat Flight Simulator 
Adventures 

40 More Great Flight Simulator 
Adventures ... 

Machine Language or Beg inners 
& the 2nd Book of Machine 
Language 

















STATE-OF-THE-ART 
MAGNETIC MEDIA 














Only $1,001 


pl 
Tho 100 File. Only $10.95 plus $2.00 S&H 
100% ERROR FREE — LIFETIME WARRANTY 
Min, order $25.00. Add 10% for loss than 50 
diskettes, Shipping and Handling: $4.00 per 100 
diskettes. Reduced shipping for larger quanti: 

ties. C.0.0. add $4.00. Cash or certified check 


cop = 
Precision Data Products, 


(ote) 483.38 
Outside Mich 


Continental USA 


pd] 








128 COMPUTE!'s Gazette August 1986 








* Normally 48 Hour Turn-Around. 
* Special Pla Chip ... $18.95 
* C64 Repair PCB Only. 38.95 
* 1541 Alignment . 25,00 
* 1541 Repair +. 69,95 
Parts Included 
(Power Supply Extra) 
Jo save C.0,D, charges - send unit and 
power supply with check or M.O. to: 
DIGITAL SOLUTIONS INC. 


1122 - Sth St. 
Altoona, PA 16601 
(814) 944-0405 

















WORD PROCESSOR FOR 
THE ENTIRE, FAMILY 


ie 

get ratte 
robe 
See eam 
pemerset 
Sarge 





15503-640-1465 





PW. 128/64 Dictionary 
‘alse available of S14 95 (US) 


i )/ The'price? It’s as low as you'd expect for a line of 
handy and software called ‘Pocket’, Siogeited Retail Price for the 64 
, eek Salita {U,S.) ae Sry eee Tah Wey 
ss ny of the 64 products may be upgraded to their 
Kat aman aan version for $15.00 (U;S.) + $3.00 suas and 
pocket handling, (Available to registered owners from Digital 
Solutions Inc. only.) 


Pocket Writer 128 or 64, Pocket Planner 128 or 64 and 
Pocket Filer 128 or 64... Solutions at sensible prices 
from Digital Solutions Inc, 





International & Distributor enquiries to: 


Serious software UV, Biatial AU Me net SoU Aa 
that’s simple to use, Wye ions Canada 8 189 


4B 189 
telephone (416) 731-8775 


Pocket Writer 128 and 64 are now available in French. ‘ 








HOW PEOPLE WITH COMMON 
INTERESTS FIND AN INTERESTING 
COMMON GROUND. 


Presenting CompuServe Forums. 


Where people from all over get 
together, without even leaving 
home. 

Now thanks to CompuServe 
Forums, computer owners are sharing 
common interests by talking to each other 
through their computer keyboards. Soft- 
ware users, computer enthusiasts, ham 
operators, french cooks, fire fighters, 
science fiction lovers and other special 
interest groups are already in touch, 
online. 

Because when you subscribe to 
CompuServe, you're able to reach people 
who want to talk about the things you do. 
As many people as you like. For as long 
as you like. Whenever you wish. 

Join a conversation already in 


progress or start one on your own. Ask 
questions. And get answers. 

All it takes is a modem, most any 
personal computer and CompuServe. 


Forum members across the country 
are as close as a local phone call. 

You can go online with just a local 
call in most major metropolitan areas. And 
normal usage fees for weekday nights and 
weekends are just 10¢ a minute. 


Of special interest to all Forum 
participants is software that’s FREE 
for the taking. 

Public domain software. For all 
sorts of activities, from games to business 
programs. And it’s just as easy to copy a 
piece of software as it is to participate in 
a Forum, 


Become a CompuServe subscriber and 
get a $25 Usage Credit to start you off. 

Becoming a subscriber is as easy as 
contacting your local computer dealer. Or 
you can call us and order direct. Suggested 
retail price is $39.95. 

And if you'd want more information 
about CompuServe, we'll be happy to send 
you a free brochure. Because with all that 
CompuServe offers—we think it’s in your 
best interest. 


CompuServe’ 


Information Services, PO. Box 20212, 
5000 Arlington Centre Biva., Columbus, OH 43220 


800-848-8199 


In Ohio, call 614-457-0802 


An HAR Block Company 


